Notifications
Clear all

Como salvar modulos em outra planilha

15 Posts
1 Usuários
0 Reactions
3,425 Visualizações
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

E ai pessoal do planilhando estou fazendo uma planilha de coferencia de ponto e eu precisava de uma sub que copia as planilhas que eu selecionar e os modulos que fazem referencia a estas planilhas e salve com o nome do cadastrado, copiar as planilhas e salva-las ja consegui, mas as macros das planilhas quando clico nelas da uma mensagem de que não estão disponiveis tem como salvar essas macros tambem?

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 30/03/2012 12:55 pm
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Boa tarde!!

Seja bem vindo!!!

Dyeferson, vou mover seu tópico para um lugar mais adequado!!

Poste um arquivo COMPACTADO, com bastante detalhes.

Att

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 30/03/2012 1:14 pm
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

obrigado! mas não sei como postar um arquivo compactado

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 30/03/2012 1:20 pm
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Boa tarde!!
Então poste em site gratuito como 4Shared ou senspace, nos mande o link, depois eu posto aqui no fórum pra você!!

Coloque todos os detalhes da onde para onde, do que para oque e assim vai!!

Att

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 30/03/2012 1:23 pm
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Dyeferson, veja no Forum Bibliotecas onde anexei um exemplo para se deletar o Modulo apos a cópia, é só adaptar para não Deletar, veja as referencias que teem de estar habilitadas para poder executar tais tarefas.

Deletar Evento na Cópia da Pasta
viewtopic.php?f=21&t=2580

As rotinas foram baseadas na Fonte abaixo:
Programming The VBA Editor
http://www.cpearson.com/excel/vbe.aspx

Veja o Item:
Copy A Module From One Project To Another

[]s

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 30/03/2012 1:28 pm
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Alexandre me desculpe pela minha ignorancia, mas é para mim postar no 4shared a planilha ou a pergunta? nunca fisso isso.

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 30/03/2012 1:33 pm
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Dyeferson, uma pergunta, quando você diz
copia as planilhas que eu selecionar e os modulos que fazem referencia a estas planilhas

São Modulos separados ?
Se as rotinas que fazem referencias a planilhas estiverem no Evento da Aba, ao utilizar o Botão Direito e escolher Criar uma Cópia - Para Outra Pasta, alem de copiar a aba os eventos tambem o são.

[]s

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 30/03/2012 1:35 pm
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Boa tarde!!

Primeiro vá pela dica do Mauro, eu até me esquecido da pesquisa do fórum.

Veja o link's do fórum que ele passou vai te ajudar!!!

Valeu Mauro, obrigado!!

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 30/03/2012 1:36 pm
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

beleza vi la os codigos irei fazer alguns testes na minha planilha, e vou postar o codigo aqui as vez fica mais facil eu enteder.

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 30/03/2012 1:45 pm
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Mauro eu fisso assim da uma olhada nesse codigo

Dim Nome As String
Nome = Sheets("Dados do funcionario").Range("b3")
Sheets(Array("Menu", "Folha de janeiro", "Folha de fevereiro", "Folha de março", "Folha de abril", _
"Folha de maio", "Folha de junho", "Folha de julho", "Folha de agosto", _
"Folha de setembro", "Folha de outubro", "Folha de novembro", "Folha de dezembro", _
"Valor das Horas", "Banco de horas janeiro", "Banco de horas fevereiro", _
"Banco de horas março", "Banco de horas Abril", "Banco de horas maio", _
"Banco de horas junho", "Banco de horas julho", "Banco de horas Agosto", _
"Banco de horas Setembro", "Banco de horas Outubro", "Banco de horas Novembro", _
"Banco de horas Dezembro", "Holerite Janeiro", "Holerite Fevereiro", "Holerite Março", _
"Holerite Abril", "Holerite Maio", "Holerite Junho", "Holerite Julho", _
"Holerite Agosto", "Holerite Setembro", "Holerite Outubro", "Holerite Novembro", _
"Holerite Dezembro", "Calculo das Férias", "13º Salario")).Copy
ChDir "C:UsersDyefersonDesktopFolha de ponto"
ActiveWorkbook.SaveAs Filename:= _
"C:UsersDyefersonDesktopFolha de ponto" & Nome & ".xlsm", FileFormat:= _
xlOpenXMLWorkbookMacroEnabled, CreateBackup:=False

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 30/03/2012 1:51 pm
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Sim Mauro os modulos são separados

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 30/03/2012 1:54 pm
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Alexandre e Mauro Obrigado por enquanto a mensagem de erro que aparece quando eu clico nos
botões criados dentro da planilha salva feita por esse codigo acima é a seguinte
"Não é possível executar a macro "Nome da planilha.xlsm. Talvez ela não esteja disponível nesta pasta de trabalho ou todas as macros esteja desabilitadas."

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 30/03/2012 2:09 pm
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

sim são modulos separados

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 30/03/2012 2:56 pm
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Boa tarde!!

Olhe com cuidado os nomes no código, se houver erro de digitação, ou o caminho do diretório for uma virgula diferente causará erro.

Att

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 30/03/2012 3:00 pm
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Alexandre e Mauro Obrigado por enquanto a mensagem de erro que aparece quando eu clico nos
botões criados dentro da planilha salva feita por esse codigo acima é a seguinte
"Não é possível executar a macro "Nome da planilha.xlsm. Talvez ela não esteja disponível nesta pasta de trabalho ou todas as macros esteja desabilitadas."

Dyeferson, tenha a certeza que as macros que estão associada aos botões no arquivo original estão no módulo que está exportando, ou se estiverem, olhe se não teem referencia explicita nas chamadas ou instruções das mesmas, pois pelo erro que citou, indica que a macro associada ao botão não se encontra em nenhum dos modulos exportado, ficando no arquivo origem.

Para testar se é isto, mantenha o arquivo original aberto e rode a rotina do arquivo exportado e veja se funciona.

[]s

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 05/04/2012 11:40 pm