Hi!
I'm trying to loop through Ranges of Cells to select & merge them
together.
I can do this by hand, and I can do this if I hardcode the cell
row&column values.

BUT, I can't seem to figure out how to do this programatically!

Thanks!
David

-----------------sample code--------------------

For datastartrow = 5 to 50
rem datastartrow is the row I'm on

ActiveSheet.Range("B13:H13").Select
ActiveSheet.Range("B13:H13").Merge
rem == Hardcoding works, but... I need to loop through the rows....

rem == HOW DO I CHANGE this to something I can loop through?
rem == eg. this doesn't work for some reason:
rem == ActiveSheet.Range(Cells(datastartrow, 2),
Cells(datastartrow, 9)).Select
rem == ActiveSheet.Range(Cells(datastartrow, 2),
Cells(datastartrow, 9)).Merge

With Selection
.HorizontalAlignment = xlGeneral
.VerticalAlignment = xlCenter
.WrapText = True
.Orientation = 0
.AddIndent = False
.IndentLevel = 0
.ShrinkToFit = False
.ReadingOrder = xlContext
End With

Next i