About Me
Com tecnologia do Blogger.
Seguidores
Estatisticas
2014-03-16
O procedimento Sub Workbook_Open(), com particularidades
3:09 da tarde |
Publicada por
JRod - PORTUGAL |
Editar mensagem
Há dias, tive necessidade de configurar o procedimento Workbook_Open() com algumas particularidades.
Deixo aqui o exemplo:
'---------------------------------------------------------------------------------------
' Procedure : Workbook_Open
' Author : JRod
' Date : 16/03/2014
' Purpose : Activa determinada folha, tira a barra com o nome das folhas e abre folha sempre com o zoom a 85%
'---------------------------------------------------------------------------------------
'
Private Sub Workbook_Open()
'Activa a folha PROGRESSIVO
Sheets("PROGRESSIVO").Activate
'Tira a barra com os nomes das folhas...
ActiveWindow.DisplayWorkbookTabs = False
'Abre s folha (planilha)"PROGRESSIVO" sempre com o zoom a 85%
ActiveWindow.Zoom = 85
End Sub