Este fórum foi descontinuado. LEIA AQUI e participe da Comunidade BABOO :)

Ir para conteúdo
pauloage

VBA - Excel - Selecionar Planilhas

Mensagem Recomendada

Olá senhores do Forum..

Gostaria de Saber se tem como em uma Macro selecionar uma Planilha conforme o Mês Corrente automaticamente! tenho 12 (Doze) Planilhas e tenho um macro para inserir um Extrato de venda mais todo inicio de mÊs tenho que alterar o Plan1.select para Plan2.select.. então pensei porque não automatizar esse processo! mais com meu pouco conhecimento VBA ainda não conheguir solucionar esse problema.. alguém tem solução para esse probleminha? Bem amigos espero ter Explicado certinho, agora conto com uma ajudinha de vocês Obrigado desde já. Valeu

Macro:

plan10.select

Range("$A$2:$I$29").Copy

Plan5.Select 'selecionar dependendo do mês corrente

Range("a2:I29").Select

Selection.Insert Shift:=xlDown

Selection.Interior.ColorIndex = 6

Selection.Interior.ColorIndex = xlNone

Range("K2:S29").Select

Range("S29").Activate

Selection.Copy

Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _

:=True, Transpose:=False

Application.CutCopyMode = False

ActiveWorkbook.Save

Plan1.Select

Compartilhar este post


Link para o post
Compartilhar em outros sites

Use uma das duas possíveis maneiras

Planilhas nomeadas de acordo com o mês:

Dim MesNome As String

MesNome = Format(Now(), "mmmm")

Sheets(MesNome).Select

Planilhas em sequencia conforme o mês do ano.... plan1 equivale a janeiro, plan2 a fevereiro..., plan12 a dezembro

Dim MesNumero As Long

MesNumero = Format(Now(), "m")

Sheets(MesNumero).Select

Compartilhar este post


Link para o post
Compartilhar em outros sites

Simples e eficiente.. e eu achei que seria uma complicação!!falta de conhecimento.. mais como a h-lera aqui entende de tudo.. valeu brother pela ajuda.. ja atualizei a rotina e deu tudo certo!! obrigado pela atenção

Compartilhar este post


Link para o post
Compartilhar em outros sites

Grande robert_eng... e como seria pra mim seleciona uma planilha conforme uma data digitada em uma TextBox_Data.text,....ex1. 01/07/2011, então a planilha selecionada seria Julho, Ex2. 11/12/2011, então a planilha selecionada seria Dezembro.. me tire essa outra duvida! pelo que eu vir você entende do assunto meses do ano. Valeu.. espero resportas

alexandre

alexandre_e

Compartilhar este post


Link para o post
Compartilhar em outros sites

Valeu.. pela aula Brother!!

Obrigado agora posso fica tranquilo todo inicio de mês..!! Muito agradecido pela ajudo..

<P>Valeu.. pela aula Brother!!<BR>Obrigado agora posso fica tranquilo todo inicio de mês..!! Muito agradecido pela ajudo..<BR><BR></P>

Compartilhar este post


Link para o post
Compartilhar em outros sites

Olá Alexandre_Eng.

Gostaria de aproveita o Topico apos tanto tempo e lhe pergunta
seria possivel aproveitando também a mesma questão do amigo Paulo.
Em vez de ser por TextBox algo como uma Lista? 
Ex. Tipo essas listas suspensas onde me mostraria as planilhas , Janeiro, Fev, ..., Nov.., Dez...
e ao escolher a macro abrisse essa planilha.

 

Compartilhar este post


Link para o post
Compartilhar em outros sites

×
×
  • Criar Novo...