Hi All,
Im just building a simple function but have been away for sometime on other projects. Could I get a hand with this one. Im copying from an activeSheet ("G") to a destination sheet ("Sheet 3") into the first column. I'd like to continue adding onto the bottom of the list. What has happen is I cant keep the xlDown into Column 1. It jumps to Column 4 and Ive changed it to paste into Column 1 but it gives an error. Also It pasts into the 3 cell of the column and doest continue to add to the bottom of the list. Im open to Columns or tables to paste into.
Thanks in advance all.
Sub Paste_New_Data()
'Copy and Paste between worksheets
ActiveSheet.Range("G2").Copy
Worksheets("Sheet3").Columns(1).Cells(1, 4).End(xlDown).Offset(1).Select
ActiveSheet.Paste
End Sub
••••ˇˇˇˇ
Im just building a simple function but have been away for sometime on other projects. Could I get a hand with this one. Im copying from an activeSheet ("G") to a destination sheet ("Sheet 3") into the first column. I'd like to continue adding onto the bottom of the list. What has happen is I cant keep the xlDown into Column 1. It jumps to Column 4 and Ive changed it to paste into Column 1 but it gives an error. Also It pasts into the 3 cell of the column and doest continue to add to the bottom of the list. Im open to Columns or tables to paste into.
Thanks in advance all.
Sub Paste_New_Data()
'Copy and Paste between worksheets
ActiveSheet.Range("G2").Copy
Worksheets("Sheet3").Columns(1).Cells(1, 4).End(xlDown).Offset(1).Select
ActiveSheet.Paste
End Sub
••••ˇˇˇˇ