Ir para o conteúdo
  • Revista PROGRAMAR: Já está disponível a edição #57 da revista programar. Faz já o download aqui!

charlie69

full <> normal screen

Mensagens Recomendadas

charlie69    0
charlie69

Boa tarde

Fazer com que o excel ao abrir se inicie com full screen é fácil.

Como fazer com que ao sair, volte ao "normal" screen?

Cumps

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites
jmaocubo    0
jmaocubo

Não entendi muito bem... Podes dar um exemplo prático???

Mas:

    Application.DisplayFullScreen = True    (coloca em full Screen)

    Application.DisplayFullScreen = False  (volta ao normal o mesmo que fazer "escape")

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites
joseA    0
joseA

o que quero é quando se mandasse fechar o ficheiro ele voltasse a por em normal screen

Boas,

No ambiente vba do ficheiro em EsteLivro copie/cole:

Private Sub Workbook_Open()
Dim barras, nTela, Cont
On Error Resume Next

    For Each barras In Application.CommandBars
        barras.Enabled = False
    Next
    Application.DisplayFullScreen = True
    ActiveWindow.DisplayHeadings = False
    Application.DisplayFormulaBar = False
    ActiveWindow.DisplayHorizontalScrollBar = False
    ActiveWindow.DisplayVerticalScrollBar = False
    ActiveWindow.DisplayWorkbookTabs = False
    Application.DisplayStatusBar = False
    
End Sub
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Dim barras
On Error Resume Next
    For Each barras In Application.CommandBars
        barras.Enabled = True
    Next
    Application.DisplayStatusBar = True
    Application.DisplayFormulaBar = True
    Application.DisplayFullScreen = False
    ActiveWindow.DisplayHeadings = True
    ActiveWindow.DisplayHorizontalScrollBar = True
    ActiveWindow.DisplayVerticalScrollBar = True
    ActiveWindow.DisplayWorkbookTabs = True

End Sub

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Crie uma conta ou ligue-se para comentar

Só membros podem comentar

Criar nova conta

Registe para ter uma conta na nossa comunidade. É fácil!

Registar nova conta

Entra

Já tem conta? Inicie sessão aqui.

Entrar Agora


×

Aviso Sobre Cookies

Ao usar este site você aceita a nossa Política de Privacidade