Views

Histats

Vitrine

VBA Excel - Exemplos de Copiar e Colar - 02

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, 


Inline image 1

LinkWithinBrazilVBAExcelSpecialist

Related Posts Plugin for WordPress, Blogger...