Skip to main content

MACRO PARA MAXIMIZAR E MINIMIZAR PLANILHA MACRO TO MAXIMIZE AND MINIMIZE WORKSHEET

Sub Sair()
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

Sub Entrar()
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

Popular posts from this blog

EXCEL, DEMONSTRATIVO DE RESULTADOS, PLANILHA

DEMONSTRTRATIVO DE RESULTADOS .XLS



Download para demonstrativo de resultados.

FICHA DE REGISTRO DE EMPREGADO, RE, REGISTRO DE FUNCIONÁRIOS MODELO .DOC

FICHA DE REGISTRO DE EMPREGADO.

Editável em Word podendo ser impresso em qualquer tipo de papel. Ideal para ser usado em impressora laser ou jato de tinta.


Download para ficha de registro.