James,
Look at the 2nd argument to .Add.
e.g.
With ThisWorkbook
.Sheets.Add , .Worksheets(.Worksheets.Count)
End With

NickHK

"JamesArchibald"
<JamesArchibald.2bju1q_1153911305.6918@excelforu m-nospam.com wrote in
message news:JamesArchibald.2bju1q_1153911305.6918@excelfo rum-nospam.com...

Hi,

I am trying to insert a blank worksheet using the code:

Sheets.add

The problem is that the new worksheet inserts itself to the left of the
active sheet. I would like it to appear at the end of the sheets e.g.
Sheet 1, Sheet 2, Sheet 3, new sheet.

Any help would be appreciated.

Thanks


--
JamesArchibald
------------------------------------------------------------------------
JamesArchibald's Profile:
http://www.excelforum.com/member.php...o&userid=33284
View this thread: http://www.excelforum.com/showthread...hreadid=565087