Excel - Impresión de Factura por Departamento

   
Vista:

Impresión de Factura por Departamento

Publicado por Mauricio (3 intervenciones) el 11/07/2018 21:14:42
Que Tal! Espero se encuentren bien.


Actualmente tengo que imprimir 5 facturas con el mismo folio.

lo malo es que en cada una de ellas, tengo que poner en el pie de pagina, departamento que van.
( Caseta, Facturación, C. por Cobrar, Archivo, Original)
Habra algún macro que permita mandar imprimir las 5 facturas al mismo tiempo, y que al imprimirse en el pie de pagina aparezca el texto mencionado en cada una. sin alterar los datos de la factura y su folio.

Agradezco de antemano su apoyo.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
Imágen de perfil de Andres Leonardo

Impresión de Factura por Departamento

Publicado por Andres Leonardo (1014 intervenciones) el 12/07/2018 00:45:55
Mira si te sirve esta

considera que en la celda C9 es donde esta tu nombre de departamento
Cabe indicar que para esto tambien la configuracion de la impresion ya debe estar lista ... cualquier cosa me avisas


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
Sub Imprimir5CopiasDif()
'
' Imprimir5CopiasDif Macro
' prueba
'
 
'
    ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True, _
        IgnorePrintAreas:=False
    Range("C9").Select
    ActiveCell.FormulaR1C1 = "Caseta"
        ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True, _
        IgnorePrintAreas:=False
    Range("C9").Select
    ActiveCell.FormulaR1C1 = "Facturación"
        ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True, _
        IgnorePrintAreas:=False
    Range("C9").Select
    ActiveCell.FormulaR1C1 = "C. por Cobrar"
        ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True, _
        IgnorePrintAreas:=False
    Range("C9").Select
    ActiveCell.FormulaR1C1 = "Archivo"
        ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True, _
        IgnorePrintAreas:=False
    Range("C9").Select
    ActiveCell.FormulaR1C1 = "Original"
End Sub
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
1
Comentar

Impresión de Factura por Departamento

Publicado por Mauricio (3 intervenciones) el 12/07/2018 01:25:26
Saludos

Gracias lo voy a hacer y si me atoro en algo con gusto te notifico,
("Cabe indicar que para esto tambien la configuracion de la impresion ya debe estar lista ") esta respuesta yo solo mando imprimir de la forma normal, o abreviando CTRL+P, y le doy enter.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
Imágen de perfil de Andres Leonardo

Impresión de Factura por Departamento

Publicado por Andres Leonardo (1014 intervenciones) el 12/07/2018 01:54:36
La idea es que invoques a la macro para imprimir y no dar control P o imprimir ....

SAludos
Andres
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

Impresión de Factura por Departamento

Publicado por Mauricio (3 intervenciones) el 12/07/2018 02:03:26
Saludos

Amigo

Me funciono Genial" te lo agradezco,

Solo le agregare el macro que tengo de folios consecutivos y listo"

En serio" tengo que aprender esto del VB.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
Imágen de perfil de Andres Leonardo

Impresión de Factura por Departamento

Publicado por Andres Leonardo (1014 intervenciones) el 12/07/2018 15:47:36
Pues que alegria ... eso es lo valioso de esto que la idea te funcione

Saludos

No olvides el +1 de la respuesta por is alguien tiene el problema le sirva de ayuda

SAludos desde ecuador
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
1
Comentar
Revisar política de publicidad