Salvare maschera in pdf sul pc

Question

Salve a tutti ho un problema per quanto riguarda il salvataggio della maschera in pdf sul pc, la maschera è composta da maschera principale e sottomaschera.

Ho usato un codice che funziona benissimo fa ciò che deve però quando vado ad aprire il pdf in questione non mi visualizza la sottomaschera, ma solo la maschera principale.

questo è il codice:

Private Sub Comando32_Click()

Dim strPathAndFile As String

strPathAndFile = ""

DoCmd.OutputTo acOutputForm, "nomemaschera", acFormatPDF, strPathAndFile, True

end sub

domanda numero 2, con queste stringhe mi fa scegliere la directory e il nome del file, e fin qui ok, volevo sapere se posso impostargli un nome predefinito composto dai campi della maschera, ad esempio cliente + numero fattura.

ho provato a modificare la stringa in alto così:

FileName = Me.[cliente].Value & Me.[numero].Value & ".pdf"

DoCmd.OutputTo acOutputForm, "tabellare", acFormatPDF, strPathAndFile, Filename, True

ma mi interrompe la funzione.....un'aiutino?

grazie a tutti in anticipo

Tanoz

Answer 1

La maschera è aperta?

Ciao

Answer 2

hahaha....non proprio ma quasi..:-)

DoCmd.OutputTo objecttype:=acOutputForm, objectname:="intestazione2", outputformat:=acFormatPDF, outputfile:=filename, autostart:=-1

mi blocca la funzione.:-(

cosa sbaglio?

mi dice l'opzione output è stata annullata

Tanoz

Answer 3

....i due punti....? persi per strada....? :-) 

DoCmd.OutputTo objecttype**:=**acOutputForm, _

               objectname:="tabellare", _

               outputformat:=acFormatPDF, _

               outputfile:=filename, _

               autostart:=-1

ciao, Sandro.

Answer 4

Ciao sandro grazie per la tempestiva risposta, :-),  ho corretto il codice ma mi illumina una parte del codice dicendo che è vuota:

DoCmd.OutputTo objecttype = acOutputForm

non capisco 

Tanoz

Answer 5

ciao Tanoz,

da me l'esportazione avviene mostrando correttamente anche la sottomaschera.

Il codice che proponi è quasi corretto, rivedrei questo passaggio  come segue:

Dim filename As String

filename = "tuoPath" & Me!cliente & Me!numero & ".pdf" ' personalizzare il path

DoCmd.OutputTo objecttype:=acOutputForm, _

objectname:="tabellare", _

outputformat:=acFormatPDF, _

outputfile:=filename, _

autostart:=-1

Inserisci il path corretto per l'esportazione in PDF.

ciao, Sandro.