Il 06/12/2015 19:09, ARatti ha scritto:
Ho creato delle macro per visualizzare e nascondere dei fogli in
calc, la macro che uso (da OOo) è la seguente:
sub NASCONDI
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(0) as new com.sun.star.beans.PropertyValue
args1(0).Name = "aTableName"
args1(0).Value = "FOLGIO1"
dispatcher.executeDispatch(document, ".uno:Hide", "", 0, args1())
end sub
Ma non funzione in modo corretto, più precisamente nasconde il foglio
selezionato, e non il foglio indicato con args1(0).Value
La stessa macro usata per mostra i foglio (al posto di ".uno:Hide" c'è
".uno:Show") funziona.
Qualche suggerimento
Grazie
Ambrogio Ratti
Prova con:
documento = StarDesktop.CurrentComponent
foglio = documento.Sheets(nfoglio)
foglio.IsVisible = false
o, se vuoi semplificare:
documento.Sheets(nfoglio).IsVisible = false
dove nfoglio è il numero indice del foglio, partendo da 0 (quindi, un
numero in meno di quello che ti fa' vedere LibreOffice
Se vuoi, posso mandarti in privato il documento o una serie di documenti
o di estensioni ricche di macro sui fogli elettronici tratti dalla rete.
(La maggior parte per OpenOffice 1.0, ma il linguaggio basic non è
cambiato).
--
Ferrari Renato Maria
Linux Registered User #219791
Linux Registered Machine #104061
[email protected]
--
Come cancellarsi: E-mail [email protected]
Problemi? http://it.libreoffice.org/supporto/mailing-lists/come-cancellarsi/
Linee guida per postare + altro:
http://wiki.documentfoundation.org/Local_Mailing_Lists/it
Archivio della lista: http://listarchives.libreoffice.org/it/users/
Tutti i messaggi inviati a questa lista vengono archiviati pubblicamente e non
sono eliminabili
