Leia também:
Copiar o conteúdo de uma célula para outra planilha pode ser feito de inúmeros modos diferentes, seguem alguns:
Sub Copy_Data()
Let Application.ScreenUpdating = False
Let Worksheets("Plan01").Range("B2:Y34").Value = ActiveSheet("Plan02").Range("B2:Y34").Value
Let Application.ScreenUpdating = True
End Sub
Outro modo de fazer a mesma coisa:
Sub Macro1()
Range("B2:Y34").Select
Selection.Copy
Sheets("Sheet5").Select
Range("B2").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=False
End Sub
Copiando uma coluna:
Sheets("Temp").Columns(1).Copy
Sheets("Overview").Range("C40").PasteSpecial
Tags: VBA, Excel, Range, Planilha, Copiar, Copy,