dafepi-2012
New member
- Local time
- Yesterday, 21:45
- Joined
- Aug 21, 2012
- Messages
- 13
MS ACCESS do not let export report to PDF with Fonts Embed.
SOLUTION: Print with [Microsoft Print to PDF] as image !!
How to fill automatic path and filename in the box save as.... ??
Thanks !!
PD: fileDialog do not work
Private Sub Print_Microsoft_Print_to_Pdf_Click()
Set Application.Printer = Application.Printers("Microsoft Print to PDF")
DoCmd.OpenReport "invoice", acViewNormal, , "[IdInvoice]=Forms![Selector_invoice]![Cod_invoice]"
'Now, set the Default Printer back to the way it was
Set Application.Printer = Nothing
End sub
Thanks
SOLUTION: Print with [Microsoft Print to PDF] as image !!
How to fill automatic path and filename in the box save as.... ??
Thanks !!
PD: fileDialog do not work
Private Sub Print_Microsoft_Print_to_Pdf_Click()
Set Application.Printer = Application.Printers("Microsoft Print to PDF")
DoCmd.OpenReport "invoice", acViewNormal, , "[IdInvoice]=Forms![Selector_invoice]![Cod_invoice]"
'Now, set the Default Printer back to the way it was
Set Application.Printer = Nothing
End sub
Thanks