Hi Guy,

Try:

Sub Macro1()
Dim r As Long
Dim rng As Range

r = 2
Set rng = Rows(r)

rng.MergeCells = True

End Sub

---
Regards,
Norman



"Joe" wrote in message
...
Hi all
How do I use the range object (vba) to merge an entire row (lets say row
r).
TIA
Guy