Creat a new worksheet

H

Hank Scorpio

Please help me to write a VBA code to creat a new worksheet named "New"
Thanks

Sub CreateNewWks()

Dim wks As Worksheet

Set wks = ActiveWorkbook.Worksheets.Add

'WARNING!
'This will fail if there's already a sheet by that name.
wks.Name = "New"

Set wks = Nothing

End Sub
 
L

lashio

Thank you, Hank

Hank Scorpio said:
Sub CreateNewWks()

Dim wks As Worksheet

Set wks = ActiveWorkbook.Worksheets.Add

'WARNING!
'This will fail if there's already a sheet by that name.
wks.Name = "New"

Set wks = Nothing

End Sub
 
Top