Salve a tutti,
Ciao,
Allo scopo, sulla sheet di origine, ho prelevato lo stile usando
questo codice:
REM ***** BASIC *****
Global sStile_Pag
Global oAktPage
Sub registra_stile_pag
oSheet = ThisComponent.Sheets.getByName(_
ThisComponent.currentcontroller.activesheet.name)
sStile_Pag = oSheet.PageStyle 'registra lo stile corrente della Sheet
esktop = createUnoService( "com.sun.star.frame.Desktop" )
Qui manca un pezzetto a oDesktop, ma deve essere stato un problema nel
copia&incolla.
oController = oDesktop.CurrentFrame.Controller
oDocument = oController.Model
oStyleFam = oDocument.StyleFamilies
oTablePageStyles = oStyleFam.getbyName("PageStyles")
oAktPage = oTablePageStyles.getByname(sStile_Pag)
End Sub
'********************************************************
Ora abbiamo tutto lo stile pagina stivato nella globale oAktPage
E se proviamo a leggerlo con xray contiene tutto quello che serve.
I problemi arrivano quando cerco di scriverlo su un'altra sheet...
'**************************************************
SUB Scrivi_stile_pag
oSheet = ThisComponent.Sheets.getByName(_
ThisComponent.currentcontroller.activesheet.name)
oDesktop = createUnoService( "com.sun.star.frame.Desktop" )
oController = oDesktop.CurrentFrame.Controller
oDocument = oController.Model
oStyleFam = oDocument.StyleFamilies
oTablePageStyles = oStyleFam.getbyName("PageStyles")
' fino a qui sembra tutto OK, ma alla riga che segue
oTablePageStyles = oStyleFam.insertByName(sStile_Pag,oAktPage)
Mi sembrerebbe più corretto:
oTablePageStyles.insertByName(sStyle_Pag, oAktPage)
Solo come nota, ma:
sStyle_Pag = oAktPage.name
così ti porti dietro una sola variabile. ;-)
'mi da un errore di runtime basic
' Type: com.sun.star.lang.IllegalArgumentException
Sicuro che le variabili globali inserite in un documento vengono "lette"
anche da un altro documento? (a me non funziona)
In ogni caso, anche modificando così non funziona....
Cercando un po' ho trovato questo:
http://www.oooforum.org/forum/viewtopic.phtml?t=10557
risale ancora ad OOo 1.1.2, quindi sinceramente non ho idea se sia
ancora vero, ma si dice che non sia possibile copiare gli stili di
pagina come vuoi fare tu, la soluzione proposta è caricarli da un file
tramite URL.
Ho provato con OOo 2.0.1 e sembra funzionare.
Ciao!
Emanuele.
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
