Nope. I wanted Selection.Merge
Ron de Bruin wrote:
Do you want this ??
Sub test()
Dim cell As Range
Dim str As String
For Each cell In Range("A1:A10")
str = str & cell.Value
Next cell
MsgBox str
End Sub
--
Regards Ron De Bruin
http://www.rondebruin.nl
wrote in message oups.com...
Is there a way to merge cells in VBA?