Esse código é bem superficial, pode ser útil ou não, depende muito de como tá estruturada sua planilha.
Só adapta pro seu problema, usa o método Workbooks pra relacionar as suas planilhas e beleza.
Mas segue lá:
Sheets("Plan2").Activate
Cells.Select
Selection.Copy
Sheets("Plan1").Activate
Range("A1").Select
ActiveSheet.Paste
Abraços.
Se a resposta lhe foi útil, clique no joinha!
Postado : 13/01/2017 11:50 am