Io uso così:

*If thisComponent.Sheets.hasByName("COMPUTO") Then* /'verifico
l'esistenza del foglio "//*COMPUTO" *e procedo, altrimenti non succede
niente/
    *oSheet = ThisComponent.Sheets.getByName("COMPUTO")* /'definisco il
nome del foglio/
    *ThisComponent.CurrentController.Select(oSheet)* /'lo seleziono,
quindi evidenzio/
   
*ThisComponent.currentController.Select(ThisComponent.CreateInstance("com.sun.star.sheet.SheetCellRanges"))
*/'annullo la selezione, ma rimane evidenziato
/*EndIf*/
/
Uso a fatica "executeDispatch()", ma è solo un'abitudine.

Ciao

On 07/12/2015 18.02, ARatti wrote:
>
> Il 07/12/2015 09:18, Giuseppe Vizziello ha scritto:
>> Ciao,
>> guarda... è molto più semplice. La macro che usi sembra generata dal
>> registratore di macro.
> Esatto
>
>> Vengo al dunque:
>>
>> Sub NASCONDI
>>     ThisComponent.Sheets.getByName("Foglio1").isVisible = FALSE
>> End Sub
> Questa va benissimo, visto che ci sono ne approfitto, uso la stessa
> funzione per saltare al foglio che mi interessa usando:
> dispatcher.executeDispatch(document, ".uno:JumpToTable", "", 0, args1())
> c'è un modo più semplice, come sopra?
>
> Grazie
> Ambrogio
>
>


-- 
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 [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

Rispondere a