Pergunte aqui

Histórico de revisões [voltar]

clique para ocultar/mostrar a revisão 1
Versão inicial

Boa noite,

Veja se é isso que procura:

Sub OcultarGuias
Dim oControlador As Object

  oControlador = ThisComponent.CurrentController
  oControlador.SheetTabs = False
End Sub


Sub ExibirGuias
Dim oControlador As Object

  oControlador = ThisComponent.CurrentController
  oControlador.SheetTabs = True
End Sub


Atte,