Paste a range and shifting away existing data

M

metricsinstitute

Hello,

I am looking a way for copying a range to an active cell such that all the data right to the active cell remain unaffected and move to the right accordingly to leave space to the new range

Avi
Thanks
 
A

Auric__

metricsinstitute said:
I am looking a way for copying a range to an active cell such that all
the data right to the active cell remain unaffected and move to the
right accordingly to leave space to the new range

Shift first, then copy:

ActiveCell.Insert Shift:=xlShiftToRight
Cells(1, 1).Copy Destination:=ActiveCell

(Replace Cells(1, 1) with the range actually being copied.)
 
Top