Help in this code for range with varibale

I have a code as

Range("D14", "Q14").UnMerge it's working fine when i give the number

But when i put this in a loop as

For i =1 to ActiveSheet.UsedRange.Rows.Count
Range("D &i", "Q &i").UnMerge
next i


It's not working ..


Can anyone help on this ..?

Thanks

You are including "i" in the quotes which treats it as the letter i, not the variable. Try this:

For i =1 to ActiveSheet.UsedRange.Rows.Count
Range("D" & i, "Q" & i).UnMerge
next i

Does that help?

Ron