"run-time error '-2147417848 (80010108)" - Selection.Insert Shift:=xlDown - Please Help!

[Mkotschy]

I have created a template for my work and the below Macro sometimes works, but sometimes crashes with the code "run-time error '-2147417848 (80010108)"

When I go to debug, the highlighted section is Selection.Insert Shift:=xlDown - I cannot see an issue with this to be honest so any help would be greatly appreciated

Sheets("Inserts").Select
Rows("2:9").Select
Selection.Copy
Sheets("Sainsburys Store").Select
Rows("2:9").Select
Selection.Insert Shift:=xlDown

These Macros are used across the spreadsheet, but for the life of me I cant work this out!

Thank You

 

[shg]

How about ...

  Worksheets("Inserts").Rows("2:9").Copy
  Worksheets("Sainsburys Store").Rows(2).Insert

If that fails, in the Immediate window, enter

? Worksheets("Sainsburys Store").UsedRange.Address

... and see what is returned.

 

[Mkotschy]

I used this and received Run Time error '1004'

Insert Method of Range class failed

I then added the

Worksheets("Sainsburys Store").UsedRange.Address

Entry, and received

Run Time error '1004'

Insert Method of range class failed

Again

 

[shg]

What does

? Worksheets("Sainsburys Store").UsedRange.Address

return in the Immediate window?

 

[Mkotschy]

Run Time error '1004'

Insert Method of range class failed