Keeping Merged Cells when Copying in Macro

[pbassett]

How can I keep merged cell formatting when I copy rows in a Macro? The macro below does not work - the new rows contain individual cells.

>>>
' Paste 6 rows with merged cells
Rows("4:9").Select
Range("C4:C9").Activate
Selection.Copy
Rows(NewRow & ":" & NewRow + 5).Select
Range("C" & NewRow & ":C" & NewRow + 5).Activate
Selection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _
SkipBlanks:=False, Transpose:=False
Application.CutCopyMode = False
<<<

 

[Von Pookie]

Duplicate post.
Please continue in your original thread:
http://www.mrexcel.com/board2/viewtopic.php?t=127474