Viviannye, depois que vi o exemplo do Marcelo, cheguei a compreender melhor.
Quanto a questão de processamento, logico que pode depender de qde de dados, tipo de maquina, memoria entre outros, e uma outra não menos importante é a otimização da rotina, por exemplo, na rotina do colega marcelo é utilizado muito o "Select" forçando o ir e voltar entre as planilhas, e nem sempre precisamos fazer desta maneira, um exemplo baseado na rotina dele seria :
Todas estas linhas na rotina :
W2.Select
W2.Columns("A:S").ClearContents
W1.Select
W1.Rows("1:1").Select
Selection.Copy
W2.Select
W2.Range("A1").Select
Selection.PasteSpecial Paste:=xlPasteAll
Application.CutCopyMode = False
Podem ser trocadas por estas duas, que efetuam a mesma coisa e direta, sem precisar ficar selecionando as abas e ranges. :
W2.Columns("A:S").ClearContents
W1.Rows("1:1").Copy Destination:=W2.Range("A1")
Com certeza se otimizarmos a rotina inteira podemos evitar processamentos desnecessário e com isto melhorar o tempo do processamento.
No momento estou com outras atividades, e assim que possivel revejo a rotina inteira.
[]s
Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel
Postado : 08/11/2015 7:16 pm