Imprimir Pdf´s en un solo archivo
Esta pregunta es para Dante Amor
Buenas tardes Dante:
Me gustaría imprimir todos los documentos en un solo archivo de PDF´s.
Esta es la macro que estamos usando pero salen las hojas por separado en lugar de hacerlo en un solo archivo.
Sub NuevoMetodoImprimir() Imprimir 1 End Sub Sub NuevoMetodoPDF() Imprimir 2 End Sub ' Sub Imprimir(salida) strImpresoraAnterior = Application.ActivePrinter If salida = 2 Then Application.ActivePrinter = "PDFCreator en Ne00:" ' For j = Columns("BB").Column To Columns("BL").Column If Cells(3, j) Then Application.Sheets("COND Y TARIF").Range(Cells(5, j)).PrintOut Next Application.ActivePrinter = strImpresoraAnterior End Sub
1 respuesta
Respuesta de Dante Amor
2