merge cell macro

plost33 · Mar 10, 2009

I am in need of a macro that will start on row 18 and merge column E and F together. i needs to start on row 18 and go thru row 5000.

Smitty · Mar 10, 2009

That should be easily recordable.

But why do you want to merge cells? It's generally not recommended.

BAlGaInTl · Mar 10, 2009

I agree that it really isn't recommended, but this code will do what you are looking for:

Code:

Sub MergeCells()
Dim i As Long
For i = 18 To 5000
    Range("E" & i & ":F" & i).Merge
Next i
End Sub

VoG · Mar 10, 2009

Try

Code:

Sub test()
Dim i As Long
For i = 18 To 5000
    Range("E" & i & ":F" & i).Merge
Next i
End Sub

plost33 · Mar 10, 2009

if i dont then i will have alot of recoding to do.

plost33 · Mar 10, 2009

thanks!