Excel - Imprimir PDFCreator automaticamente

 
Vista:

Imprimir PDFCreator automaticamente

Publicado por Ivanxu94 (2 intervenciones) el 23/01/2017 11:05:52
Buenos días, me gustaría saber como imprimir con el programa pdfCreator directamente sin que me saliera el asistente y guardará el archivo con el nombre y la ubicación especificado. Ahora no me da error pero tampoco me lo hace. Si alguien tiene alguna idea se lo agradeceré infinitamente, un saludo!

Adjunto el código por si quereis verlo

exApp.ActiveSheet.PrintOut(Copies:=1, Preview:=False, Collate:=True)
exApp.ActiveWorkbook.SaveAs("\\Desktop\MiCarpeta\" & Clientee & "\HojaCostes.pdf")

Dim PDFCreator1 As PDFCreator.clsPDFCreator
Dim opt As clsPDFCreatorOptions


PDFCreator1 = New clsPDFCreator

PDFCreator1.cVisible = False

opt = New clsPDFCreatorOptions
With opt
.UseAutosave = 1
.UseAutosaveDirectory = 1
.AutosaveDirectory = ("\\Desktop\MiCarpeta\" & Clientee & "'
.AutosaveFormat = 0 ' PDF
.AutosaveFilename = "HojaCostes.pdf")
End With
With PDFCreator1
.cOptions = opt
.cClearCache()
.cPrinterStop = False
End With


opt = Nothing

PDFCreator1.cClose()
PDFCreator1 = Nothing


La impresora por defecto es el PDFCreator pero de todas formas también agradecería si lo supierais como decirle por que impresora quiero que imprima! MUCHISIMAS GRACIAS de antemano! ^^
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 Antoni Masana
Val: 4.134
Plata
Ha mantenido su posición en Excel (en relación al último mes)
Gráfica de Excel

Imprimir PDFCreator automaticamente

Publicado por Antoni Masana (1518 intervenciones) el 24/01/2017 13:11:27
No realizo listados en PDF desde excel pero con estas pocas lineas deberia ser suficiente:

1
2
3
4
5
Sub Macro1()
    ActiveWindow.SelectedSheets.PrintOut Copies:=1, _
                                         Collate:=True, _
                                         IgnorePrintAreas:=False
End Sub

La mejor forma de conseguir un buen código es:
- Grabar Macro.
- Realizar tarea ( en este caso imprimir en impresora PDF)
- Finalizar Macro.

Saludos.
\\//_
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

Imprimir PDFCreator automaticamente

Publicado por Ivanxu94 (2 intervenciones) el 24/01/2017 14:47:01
Gracias! Lo probaré :)
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