I am trying to concatenate 2 values (for instance new value in cell D4=
current value cell D4 + value Cell D3)

I get an error message 13 with this code:
For Each cell In Columns(4)
cell.Value = cell.Value & cell.Offset(0, -1).Value
Next

Any idea?
thanks
--
caroline