Notifications
Clear all

Macro para copiar conjunto de abas

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

Bom dia galera!

To precisando de uma ajuda de vocês. Eu tenho uma planilha que tem um conjunto de abas as quais para cada evento que tenho, tenho que criar um conjunto novo dessas abas, de forma que de uma vez só tenho que criar varios conjuntos.
Gostaria de uma fazer uma macro que tivesse um campo onde eu digita-se a quantidade de conjuntos que eu queria criar e ele criasse todas automaticamente e que já pudesse renomea-las.
Ex.: As abas são Material, Serviço, Custo Total (essas são as matrizes) apos a execução da macro elas deveriam ficar:
Material(1), Serviço(1), Custo Total(1)
Material(2), Serviço(2), Custo Total(2)
Material(3), Serviço(3), Custo Total(3)

Sendo que essas planilhas tem formulas entre elas sendo assim tenho que cria-las juntas, eu ja tenho uma macro que cria um conjunto de cada vez mas nao sei nem por onde começar para fazer ela criar varios conjuntos e nem alterar os nomes desses conjuntos

Valeu

 
Postado : 01/06/2011 7:23 am
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Hugo, poste o que já tem pronto fica mais facil analizar, e se possivel um anexo de seu modelo.

abraços

 
Postado : 01/06/2011 7:30 am
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

O que tenho ate agora é isso
Sub criarguias()
'
' criarguias Macro
'
' Atalho do teclado: Ctrl+w
'
Sheets(Array(" MA", "O.E. ", "CCU ", "MT")).Select
Sheets("MT").Activate
Sheets(Array(" MA", "O.E. ", "CCU", "MT")).Copy Before:=Sheets(1)
Range("C8").Select
End Sub
onde eu crio um conjunto de cada vez e tenho que renomea-las uma por uma

http://www.4shared.com/document/APhySFj ... lha_1.html

 
Postado : 01/06/2011 9:05 am