Este fórum está sendo desativado

[LucasSegalla]

Boa tarde Pessoal!

Fiz um código vba para exibir uma planilha em tela cheia, porém qdo executo o código o excel sempre fica em tela cheia.
Alguém pode me ajudar?

Coloquei o seguinte código em um botão

Private Sub ()
Application.DisplayFullScreen = True
End sub

Fiz outro botão para desabilitar o modo de tela cheia também.

Obrigado

Abraços

[alexandrevba]

Boa tarde!!

Eu não entendi, se o código deve mostra em tela cheia e é isso que vc quer, qual o problema?
Tente algo assim.

Código: Selecionar todos

Sub Tela_FullScreen()
'Esse código pode ficar dentro do módulo comum ou ficar dentro do módulo da pasta de trabalho
Dim barras
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

Código: Selecionar todos

Private Sub Workbook_BeforeClose(Cancel As Boolean)
'Esse código deve ficar dentro do módulo da pasta de trabalho
Dim barras
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

Att

[LucasSegalla]

O Problema é que com esse código, outras planilhas ficarão em tela cheia. Porém, quero apenas uma em tela cheia, entendeu?

[LucasSegalla]

Esse código que você me passou funciona, porém se minimizo e maximizo a tela, volta ao normal.

[alexandrevba]

Boa noite!!

Há várias forma de refernciar um objeto.
https://msdn.microsoft.com/en-us/librar ... 35568.aspx
Aponte para o arquivo que deseja.

Att