Help! with macro loop please, merge range loop

you might try:

dim count as integer
range("a1").select

count = 1
do while count < 350

Range("$f1:$k1").Select
<do whatever you are doing to your range here>
count = count + 1
loop

im kind of a noobie so im not sure if the dollar signs go in front of the static information (what doesnt change --- in your case the columns) or dynamic (what does change)

if that doesn't work you might try:

dim count as integer
range("a1").select

count = 1
do while count < 350

Range("f" & count:"k" & count).Select
<do whatever you are doing to your range here>
count = count + 1
loop

In this case I don't think you need to loop through. Try

Range("f1:k350").Merge True

The merge method accepts an extra argument that makes the merging row by row rather than one enormous 350 row cell.

You might like to supress the warning message you get if the cells contain data using:

Application.DisplayAlerts = False
Range("f1:k300").Merge True
Application.DisplayAlerts = True

Gary

Your awesome Gary, Thanks, Funny I called the macro Sub Merge