NewSheet 事件

当在工作簿中新建工作表时产生此事件。

Sh   新工作表。可以是一个 Worksheet 或 Chart 对象。

示例

本示例将新建的工作表移到工作簿的末尾。

Private Sub Workbook_NewSheet(ByVal Sh as Object)
    Sh.Move After:= Sheets(Sheets.Count)
End Sub