Salve a tutti,
avrei bisogno di una macro che copia tutto il contenuto (compresa la
formattazione) di una sezione all'interno di un'altra sezione in un
altro documento.
Finora ho usato questa macro che copia solo il testo non formattato:
oDoc = ThisComponent
oTS = oDoc.getTextSections
oSection = oTS.getByName("Testo")
sSectionTesto = oSection.Anchor.String
sUrl = "c:\modellolettera.odt"
oDoc = StarDesktop.LoadComponentFromURL(sUrl, "_default", 0,
aFileProp())
oTS = oDoc.getTextSections
oSection = oTS.getByName("Testo")
oSection.Anchor.String = sSectionTesto
La mia idea è di accedere alla sezione di origine in questo modo:
oAnchor = oSection.getAnchor()
oDoc.CurrentController.select(oAnchor)
per poi incollare il contenuto nella sezione di destinazione.
Il problema è che non so come si ottiene il controllo del cursore
all'interno di una sezione...
Qualche idea?
---------------------------------------------------------------------
Per cancellarsi: [email protected]
Per informazioni: http://www.openoffice.org/it/
Archivi: http://mail-archives.apache.org/mod_mbox/incubator-ooo-utenti-it
