Pular para o conteúdo principal

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

Postagens mais visitadas deste blog

Registro Médico Para Controle De Medicação Em Excel Fácil

Registro Médico Para Controle De Medicação Em Excel Fácil 
LINK PARA DOWNLOAD

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.



Recibo de pagamento, contra-cheque em excel automático.

Para quem precisa emitir recibo de pagamento de salário e não tem softwares específicos segue aí uma solução:
É automático, pode ser impresso em cores ou em preto e branco e ainda ser usado por várias empresas.
Link para download: Baixar arquivo Excell