Hi,the following is a simpe macro to add a worksheet,
just doesnt seem to be working,
mnay thanks

Sub test()
Set wks = Worksheets.Add(After:=(Workbook.Sheets.Count))
wks.Name = "taz"
End Sub


--
T De Villiers
------------------------------------------------------------------------
T De Villiers's Profile: http://www.excelforum.com/member.php...o&userid=26479
View this thread: http://www.excelforum.com/showthread...hreadid=566705