Notifications
Clear all

Selecão de plan em função do mês corrente

2 Posts
1 Usuários
0 Reactions
517 Visualizações
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Olá amigos. Tenho um arquivo em excel que contém 12 plans, sendo cada uma pertinente a um mês (cujos nomes são 'jan', 'fev', 'mar', etc. ). Preciso de um código em VBA que selecione a plan correspondente ao mês em função da data que estamos. Ou seja, se estivermos no mês de janeiro, o arquivo será aberto com a plan de 'jan'; qdo vier o mês de fevereiro, ao ser iniciado, o arquivo abre na aba 'fev'; e assim por diante. É possível isso ? Agradeço a ajuda. Abraços.

 
Postado : 07/10/2011 6:44 am
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 


No VBAProject, em EstaPasta_de_trabalho:

Private Sub Workbook_Open()

m = Month(Now())
ws = Application.WorksheetFunction.Choose(m, "jan", "fev", "mar", "abr", "mai", "jun", "jul", _
"ago", "set", "out", "nov", "dez")

Sheets(ws).Activate

End Sub

 
Postado : 07/10/2011 8:01 am