Imprimir factura de Excel en PDF con nombre sito en una celda
Para Dante Amor
Necesito imprimir mis facturas generadas tanto en PDF, (para archivar) como en papel.
Puede ser con una macro, donde primero me imprima el archivo PDF con el nombre del valor de una celda,
y después imprima dos copias en papel
1 respuesta
Respuesta de Dante Amor
1
Prueba con esto:
Sub aPdf()
'Por.Dante Amor
ruta = ThisWorkbook.Path
arch = Range("M2")
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, _
Filename:=ruta & "\" & arch & ".pdf", _
Quality:=xlQualityStandard, IncludeDocProperties:=True, _
IgnorePrintAreas:=False, OpenAfterPublish:=True
ActiveWindow.SelectedSheets.PrintOut Copies:=2, Collate:=True
End Sub
