VBA Transfering Data To Next Sheet

Closed
Report
Posts
17
Registration date
Thursday March 3, 2011
Status
Member
Last seen
July 20, 2011
-
Posts
365
Registration date
Monday February 7, 2011
Status
Contributor
Last seen
September 30, 2013
-
Hello,
I'm applying this code to transfer data from sheet 1(source) to sheet 2(destination).

Sub TransferData()
For Each cell In Range("B1", Range("B65536").End(xlUp))
Range(cell, cell.Offset(, 1)).Copy Sheets("Sheet2").Range("A65536").End(xlUp).Offset(1)
Next cell
End Sub

The problem I'm encountered is that the transfered data will always be in column A in sheet2 therefore erasing out the previously transfered data from sheet 1.Can somebody provide me with the VBacode so that the data transfer from the sheet 1 will be arrange accordinglly into sheet 2,first in column A,than column B, column C and so on.I have 31 columns.

Thanks

1 reply

Posts
365
Registration date
Monday February 7, 2011
Status
Contributor
Last seen
September 30, 2013
120
Could you please upload a sample EXCEL file WITH sample data on some shared site like https://authentification.site
AND post back here the link to allow better understanding of how it is now and how you foresee. Based on the sample book, could you re-explain your problem too.


Note: your data need not be to be real data but a good representative of how data looks like