Strange result inserting row

[Gregfox]

Hi all I've worked 2 hours trying to determine the problem with the following simple code:

Sheet1.Rows(3).insert      'Insert a new row at Row3

When I run it on a blank workbook/worksheet it works just fine, however when I run it on a

workbook/worksheet with data it just passes (in single step) this code and does nothing. ??
Using 2007 on a PC non-protected workbook.

​

 

[sericom]

It could be the way you're referencing the sheet, try specifying the name that is on the sheet tab

Sheets("Sheet1").Rows(3).insert

 

[Gregfox]

I tried that, but it made no difference. Confusing ...

 

[RoryA]

Is there a Table on the sheet?

 

[Gregfox]

No Table on the sheet, there is conditional formatting, formulars and the like.

 

[RoryA]

Any other code in that workbook? Does any of the conditional formatting use a UDF?

 

[Gregfox]

No UDF but lots of code. Conditional format very basic.

 

[Gregfox]

I gave up and will use what works:

    'Sheets("SUN").Select
    'Rows("3:3").Select
    'Selection.Insert Shift:=xlDown
    'Application.CutCopyMode = False
    'Selection.ClearContents

Many thanks for your efforts!

 

[RoryA]

If that works, are you sure that the code name for SUN is really Sheet1? What does Msgbox Sheet1.Name show?

 

[Gregfox]

Yes I believe that to be true, again THANKS!