Buonasera, ho provato molte macro presenti sul forum per salvare un solo foglio (dei tanti presenti nel file) in formato pdf, ma non ci sono mai riuscito. Ho anche registrato una macro, mentre registravo la micro salvando il file salvato pdf era il solo foglio selezionato, ma quando lancio la macro mi salva tutti i fogli.
Mi piacerebbe, che il file salvato avesse com nome il contenuto una specifica cella.
Grazie
Salvare foglio in formato PDF con nome da cella
Salvare foglio in formato PDF con nome da cella
macOS 15.01 Sequoia: LibreOffice 24.8.2.1
Re: Salvare foglio in formato PDF con nome da cella
Ciao amax
stampare un range, ossia il foglio, effettivamente è un pò articolato. Ti passo come spunto una parte di macro che uso, lasciando a te approfondire :
Buona ricerca. Nicola
stampare un range, ossia il foglio, effettivamente è un pò articolato. Ti passo come spunto una parte di macro che uso, lasciando a te approfondire :
Codice: Seleziona tutto
' Filter Pdf
Dim aFilterData(0) As new com.sun.star.beans.PropertyValue
aFilterData(0).Name = "Selection"
aFilterData(0).Value = rgPrint
Dim aFilterPdf(1) As new com.sun.star.beans.PropertyValue
aFilterPdf(0).Name = "FilterName"
aFilterPdf(0).Value = "calc_pdf_Export"
aFilterPdf(1).Name = "FilterData"
aFilterPdf(1).Value = aFilterData()
'Store
Dim sPathUrlPdf
If InStr(sNamePathUrlPdf, "file:/") = 0 Then
sPathUrlPdf = Wb.DirUrl(oWb) & "/" & sNamePathUrlPdf
Else
sPathUrlPdf = sNamePathUrlPdf
End If
'
oWb.storeToURL(sPathUrlPdf, aFilterPdf())
Ultima modifica di charlie il giovedì 29 febbraio 2024, 8:48, modificato 1 volta in totale.
Motivazione: Formattato codice
Motivazione: Formattato codice
Nicola con LibreOffice 7.1 (x64) su Windows 11
Re: Salvare foglio in formato PDF con nome da cella
grazie, ci proverò e se ci riesco condivido la mia versione
macOS 15.01 Sequoia: LibreOffice 24.8.2.1