Personalizando Calc como Aplicativo - II

Na Macro abaixo, tem possibilidade de definir o tamanho da janela em pixel ou percentual da tela, e centralizar na tela ?

Ou melhor fixar o tamanho da janela para não houver alteração pelo usuário ?

Da maneira que esta, a tela é aberta conforme o último salvamento do arquivo.

'========================================================================
Sub AbreTelaInteiraLigar
'=========================================================================
'oSheet = ThisComponent.Sheets.getByName("ESCOLHER ABA")
oController = ThisComponent.CurrentController
With oController
    '.setActiveSheet(oSheet)
    .ColumnRowHeaders = False
    .SheetTabs = False
    .Frame.LayoutManager.HideCurrentUI = True
    .Frame.Title = "Titulo na Janela do Aplicativo" 
    .HorizontalScrollBar = False
    .VerticalScrollBar = False
End With
end sub

.E para retornar:

'=========================================================================
Sub AbreTelaInteiraDesligar
'=========================================================================
'oSheet = ThisComponent.Sheets.getByName("ESCOLHER ABA")
oController = ThisComponent.CurrentController
With oController
   ' .setActiveSheet(oSheet)
    .ColumnRowHeaders = True
    .SheetTabs = True
    .Frame.LayoutManager.HideCurrentUI = False
    .Frame.ComponentWindow.SetFocus() '<<<< Devolver o foco a janela <<<<'
    .HorizontalScrollBar = True
    .VerticalScrollBar = True
End With
End Sub

Veja arquivo exemplo.

como desfaço isso?
mais essa macro é muito útil.

Para sair da tela inteira : Ctlr + Shift + J. Ou em um Botão ligue a macro que inclui acima…tem arquivo exemplo…

deu certo, muito obrigado!!!

Bom dia, apenas para complementar a macro

.HorizontalScrollBar = False
.VerticalScrollBar = False

para as barras horizontal e vertical

Ok, @JúnioVieira, já incorporado ao código, obrigado.

Ola @JúnioVieira, sobre estes comando, conhece algum lugar que tenha a relação deles ?

Bom dia Gilberto, infelizmente não sei, alguns comandos pesquiso como fazer no vba (excel) e faço algumas adaptações para ver se funciona, as vezes dá certo.

Ok, obrigado.