Copy cells : Copy Paste « Excel « VBA / Excel / Access / Word






  1. VBA / Excel / Access / Word
  2. Excel
  3. Copy Paste

Copy cells

 
Sub CopyHeads()
  With Worksheets("Sheet1").Range("A1")
    .Range(.Cells(1), .End(xlToRight)).Copy _
        Destination:=Worksheets("Sheet2").Range("A1")
  End With
End Sub








Related examples in the same category

1.Select current range and copy
2.Overridden with the Destination parameter
3.Copy areas
4.Copy and Paste can be carried out entirely by the Copy method