Pagina 1 di 1
[Risolto] Esportazione in Pdf con macro
Inviato: lunedì 3 settembre 2012, 21:51
da paolog
Ciao
Vorrei fare una esportazione pdf con macro da calc, però con un area variabile che imposta l'utente selezionando i limiti (cella in alto a sx e cella in basso a dx) puntandoli con il mouse
Spero di essermi spiegato
Grazie Mille in anticipo
Re: Esportazione in Pdf con macro
Inviato: mercoledì 12 settembre 2012, 11:12
da Gumo
Da macro io non ci sono riuscito... Mi esporta sempre tutta la pagina.
In verità ho trovato una segnalazione che impostava i parametri di selezione, ma la cosa mi pareva talmente astrusa che ho preferito mantenere l'export completo della pagina.
g
Re: Esportazione in Pdf con macro
Inviato: giovedì 13 settembre 2012, 19:19
da c.spaziani
Ciao,
seleziona un range ed esegui questa macro:
Codice: Seleziona tutto
Sub ExportSelectionToPDF
Dim a(1) As New com.sun.star.beans.PropertyValue
Dim b(0) As New com.sun.star.beans.PropertyValue
oDoc = ThisComponent
oSheet = oDoc.getCurrentController.ActiveSheet
aSel = oDoc.getCurrentSelection.RangeAddress
b(0).Name = "Selection"
b(0).Value = oSheet.getCellRangeByPosition(aSel.StartColumn, aSel.StartRow, aSel.EndColumn, aSel.EndRow)
a(0).Name = "FilterName"
a(0).Value = "calc_pdf_Export"
a(1).Name = "FilterData"
a(1).Value = b()
BasicLibraries.LoadLibrary("Tools")
oDoc.storeToURL(GetPathSettings("Work") + "/Selection.pdf", a())
End Sub
Nella tua cartella di lavoro dovresti trovare un file chiamato Selection.pdf contenente solo i dati selezionati.
Re: Esportazione in Pdf con macro
Inviato: venerdì 14 settembre 2012, 8:24
da Gumo
Ottimo e molto chiaro.
grazie della condivisione
g