Buongiorno,
avrei necessità di creare un file pdf tramite la stampa di un report, l'unico problema che diventa di dimensioni abbastanza elevate circa 1MB a pagina
c'è modo per avere direttamente una compressione di questo file
la stringa di VBa che utilizzo è questa
Private Sub Conteggio_PDF_Click()
DoCmd.OpenReport "Conteggio usato", acViewPreview, , "ID =" & Me!ID
Cart = [Cognome] & " " & [Nome]
Contratto = [ID] & " - Conteggio " & [Cognome] & " " & [Nome]
MsgBox (Cart)
DoCmd.OutputTo acOutputReport, "Conteggio usato", acFormatPDF, "\\" & Cart & "\" & Contratto & ".pdf"
DoCmd.Close acReport, "Conteggio usato"
End Sub
Grazie