Bonjour à tous,
- Version OpenOffice 1.1.1
J'ai fait la macro suivante avec l'enregistreur de macro sous calc afin
d'exporter un tableau (genre facturier).
La macro marche trés bien. Ma question est de savoir s'il est possible de
nommer le fichier PDF en fonction d'une cellule, c'est-à-dire si je met AAA
dans une cellule précise, le fichier s'exportera en AAA.pdf ?
sub exportpdf
rem ----------------------------------------------------------------------
rem define variables
dim document as object
dim dispatcher as object
rem ----------------------------------------------------------------------
rem get access to the document
document = ThisComponent.CurrentController.Frame
dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")
rem ----------------------------------------------------------------------
dim args1(1) as new com.sun.star.beans.PropertyValue
args1(0).Name = "URL"
args1(0).Value = "file://posteréseau/partage/dossierpdf/000001.pdf"
args1(1).Name = "FilterName"
args1(1).Value = "calc_pdf_Export"
dispatcher.executeDispatch(document, ".uno:ExportDirectToPDF", "", 0, args1())
end sub
Merci d'avance
