Transfer information from column

C

Canon

Excel 2007
I have a large spreadsheet that was exported from a accounting file. There
are four columns with addresses, (add 1, add 2...), I would like to be able
to take this information and move it into one column without re-doing all the
information. If I can do this, I will be able to wrap the text to fit on the
same page.
 
D

Don Guillett

Sub put4columnsinto1()
dim i as integer
dim dlr as long
dim lr as long

For i = 2 To 4
dlr = Cells(Rows.Count, 1).End(xlUp).Row + 1
lr = Cells(Rows.Count, i).End(xlUp).Row
Cells(1, i).Resize(lr).Copy Cells(dlr, 1)
Next i
End Sub
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top