Hi There,

I need to copy column A and B from a worksheet (tab – Abslayer_BCN) and paste the values in a separate spreadsheet at the end of the E : F columns ( Tab - Abslayer_SAP_BCN). When I say End of the E:F column which I mean I want to paste these immediately after the data where blank row appears. Because I am collating the data after every batch run in this sheet.

I am using 2003 version. When I run the macro the both the worksheets will be open.

I am trying the below code which is not working so I need some expert’s help to resolve this. 

Private Sub CommandButton1_Click()

Dim ws As Worksheet
Dim i As Long, j As Long, lrow As Long

Set ws = Workbooks("IPT2_Batch_12_Report_Oct12.xls").Worksheets("Abslayer_BCN")
ws.Range("A2:B2").Copy ThisWorkbook.Worksheets(Abslayer_SAP_BCN).Range("E:F").Offset(1, 0)

End Sub
I appreciate every single reply and how everyone tries and help others in this forum. This is really amazing.

Thanks,
Su.