VBA Excel - Exemplos de Copiar e Colar - 02

Consultancy in Excel, Access, VBA, Dashboards, Scorecards & PowerPoint Projects

DESENVOLVO APLICAÇÕES VBA

Perguntas, Questões e Esclarecimentos

Baixe o Calendário Compacto para 2014 em Excel

Esse aqui vai copiar o conteúdo da célula  C1 para a última célula usada na coluna "C" na Sheet1. Em seguida colará na primeira linha após a última entrada da coluna A na Plan2:

 Sub CopyPasteToOtherSheet()

Worksheets("Sheet1").Range(Range("C1"), Range("C65536").End(xlUp)).Copy Destination:=Worksheets("Sheet2").Range("A65536").End(xlUp).Offset(1, 0)

End Sub

Tags: Excel, VBA, copy, paste,