Re: [it-users] macro per nascondere fogli in calc

Ciao,
guarda... è molto più semplice. La macro che usi sembra generata dal
registratore di macro. Non è detto che il registratore faccia nel
migliore dei modi. Anche io lo uso, ma è solo l'ultima spiaggia.

Vengo al dunque:

Sub NASCONDI
        ThisComponent.Sheets.getByName("Foglio1").isVisible = FALSE
End Sub

Questo è tutto.
Naturalmente non funziona se Foglio1 è l'unico foglio che hai.

Puoi anche parametrizzare in questa maniera:

Sub NASCONDI (sFoglio as String)
        ThisComponent.Sheets.getByName(sFoglio).isVisible = FALSE
End Sub

Quindi usarla così:

Sub ciccio
        NASCONDI ("Nome del foglio da nascondere")
End Sub

Ma per una Sub così corta non ne vale la pena.

Giuseppe

On 06/12/2015 19.09, ARatti wrote:
> 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


-- 
Giuseppe Vizziello - Associazione LibreItalia
mob: +393282009610
http://www.giuSerpe.it - skype: giuserpe
http://leeno.org
LeenO - computo metrico assistito su LibreOffice
G+:https://plus.google.com/communities/115347226088179821692

-- 
Come cancellarsi: E-mail users+unsubscribe@it.libreoffice.org
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