ActiveWorkbook.Sheets.Add not working properly

[sharonng]

I want to add new sheets after the original sheet. I typed ActiveWorkbook.Sheets.Add(After:=ActiveWorkbook.Worksheets(ActiveWorkbook.Worksheets.Count)) but a compile error showed. What's wrong and how to fix that?

 

[HaHoBe]

Hi sharonng,

maybe try

ActiveWorkbook.Sheets.Add After:=ActiveWorkbook.Worksheets(ActiveWorkbook.Worksheets.Count)

or

Sheets.Add After:=ActiveWorkbook.Worksheets(ActiveWorkbook.Worksheets.Count)

Ciao,
Holger