How to combine Selection. PasteSpecial and Selection.insert Shift in one VBA code ?

[jfglrx]

Hello,

I would like to know if there is a way to combine in only one vba code this two code? In fact, i would like to have the possibility to select ranges, copy and paste them without erase others ranges and also without copy the conditonal formats.

Sub
Selection.PasteSpecial Paste:=xlPasteAllMergingConditionalFormats, Operation _
:=xlNone, SkipBlanks:=False, Transpose:=False
End Sub

Sub
Selection.insert Shift:=xlDown
End Sub

Thanks a lot in advance,
Jfglrx

[jfglrx]

So, i assume that it's not possible to do it ?
��