Notifications
Clear all

RENOMEAR UMA PLANILHA EXECUTANDO UMA MACRO

5 Posts
2 Usuários
0 Reactions
982 Visualizações
(@valdabr)
Posts: 174
Reputable Member
Topic starter
 

boa tarde meus amigos, preciso da seguinte ajuda no arquivo em anexo, no formulário, cadastro de cotista, botão novo, coloquei uma macro que me permite copiar uma planilha modelo (Plan1), ao cria essa cópia eu cadastro uma nova pessoa, e é aí que preciso de ajuda, ao digitar o nome de uma nova pessoa na caixa nome no cadastro de cotistas eu precisava renomear automáticamente a cópia da planilha com o nome da nova pessoa substituindo o nome criado Plan1(2) ao salvá-lo com o botão salvar. bom não sei se é possível fazer esse comando mais se for, agradeço desde já atenção de todos muito obrigado

 
Postado : 13/02/2017 2:21 pm
(@mprudencio)
Posts: 0
New Member
 

Acrescente essas duas linhas de codigo antes de limpar os dados das caixas de texto


ActiveSheet.Copy After:=Sheets(Sheets.Count)
ActiveSheet.Name = CAIXA_NOME.Value

 
Postado : 13/02/2017 6:24 pm
(@valdabr)
Posts: 174
Reputable Member
Topic starter
 

meu amigo marcelo, bom dia! olha seu comando funcionou sim, mais o que acontece é que ele tem horas que ele lança os dados do cadastro na planilha usuáriosesenhas ou cria 2 cópias uma da pla1 e uma com o nome que cadastro

 
Postado : 14/02/2017 7:11 am
(@mprudencio)
Posts: 0
New Member
 

Erro meu

Lance mais essa linha apos a ultima

plan1.select

 
Postado : 14/02/2017 7:35 am
(@valdabr)
Posts: 174
Reputable Member
Topic starter
 

Sr Marcelo, muito obrigado, agora sim funcionou da forma que eu precisava, agradeço também a todos que dispuseram do seu tempo para dar uma olhada na minha questão, muito obrigado!

 
Postado : 14/02/2017 10:20 am