View Single Post
  #5   Report Post  
Posted to microsoft.public.excel.programming
Gord Dibben Gord Dibben is offline
external usenet poster
 
Posts: 22,906
Default Combining Cell Contents

Tom

=A1&B1

Or do you want a VBA method.

Sub test()
Dim rng As Range
Set rng = Range(Cells(1, "A"), Cells(Rows.Count, "A").End(xlUp))
For Each cell In rng
cell.Value = cell.Value & cell.Offset(0, 1).Value
' cell.Offset(0, 1).ClearContents 'optional
Next
End Sub


Gord Dibben MS Excel MVP



On 28 Jan 2007 10:56:03 -0800, "Tom" wrote:

Hello,

Need help in moving column contents without overwriting existing
contents. Example - Cell A1 contents is "1234/", cell B2 is "55". Want
to move all of column B to column A without overwriting the cells in
column A. In example cell A1 would end up reading "1234/55".

Thanks,
Tom