WorkbookNewSheet Event

Occurs when a new sheet is created in any open workbook.

Private Sub object_WorkbookNewSheet(ByVal Wb As Workbook, ByVal Sh As Object)

object An object of type Application declared with events in a class module. For more information, see Using Events with the Application Object.

Wb The workbook.

Sh The new sheet.

Example

This example moves the new sheet to the end of the workbook.

Private Sub App_WorkbookNewSheet(ByVal Wb As Workbook, _
        ByVal Sh As Object)
    Sh.Move After:=Wb.Sheets(Wb.Sheets.Count)
End Sub