jeffbart

essoal Criei uma macro com um rotina para fazer algumas edições simples (retirar formulas e códigos VBA) de algumas planilha, que utilizo como referencia para outras funções. a edições ocorre corretamente, porém quando entra o comando para fechar a planilha após a edição, vem uma mensagem de erro e reinicia o Excel. Os comandos são mais ou menos esses que seguem: Sub editar1(arq As String) Workbooks.Open Filename:=arq nome = Dir(arq) novonome = pasta & "\Copy of " & nome nome2 = Dir(novonome) Call DeleteVBACode Call Remover_Form ActiveWorkbook.SaveAs novonome Windows(nome2).Activate ActiveWorkbook.close End Sub Postei a planilha no mediafire: http://www.mediafire.com/?sharekey=a9fa5f7...f75605ba775ce83 Se alguém me der uma orientação, serei imensamente grato (posso até pagar umas brejas, hehehehe)