Importing data via VBA but not to overwite data

[sharon9999]

Hi

I am trying to import data but to insert rather than paste.
The code I have is pasting the data in to columns A-E but the existing data in columns G-I is moved down rows.
The code is
Cells.Select
Selection.Copy
Sheets("No Answer").Select
Range("A1").Select
ActiveSheet.Paste
Columns("A:E").Select
Columns("A:E").EntireColumn.AutoFit
Range("A1").Select

instead of paste I have tried ActiveSheet.Insert shift:=xlToRight, but no luck.

The data in columns G-I have formulas linking to columns A-E, I need the data pasted next to the G-I columns for the formulas to work.

Please help??

Thanks
SC

 

[Yongle]

instead of

Cells.Select

Try

Range("A:E").Select

 

[sharon9999]

so easy.......
Thank you

 

[Yongle]

thanks for the feedback