版权声明：本文为博主原创文章，转载请在显著位置标明本文出处以及作者网名，未经作者允许不得用于商业目的。
4 其他事件
针对插件的事件主要有Startup、Shutdown这两个事件，在第2节中已经讲解。在开发窗口中，选择对象和事件那里可以看到相应的事件：
图9 （ThisAddIn事件）对应的事件
但是，除了插件的事件，还有Excel本身的事件。
在[（ThisAddIn事件）]处，选中[Application]，可以看到很多Excel本身的事件，主要的事件说明如下：
| 事件 | 说明 |
| WorkbookOpen | 打开工作簿时 |
| WorkbookDeactivate | 工作簿被取消激活时 |
| WorkbookActivate | 工作簿被激活时 |
| WorkbookBeforeSave | 工作簿被保存前 |
| WorkbookAfterSave | 工作簿被保存后 |
| WorkbookBeforeClose | 工作簿被关闭前 |
| WorkbookNewSheet | 创建新的工作表时 |
| SheetActivate | 工作表被激活时 |
| SheetDeactivate | 工作表被取消激活时 |
| SheetChange | 工作表的单元格发生改变时 |
| SheetSelectionChange | 工作表选择区域发生改变时 |
| SheetBeforeDoubleClick | 用户鼠标双击工作表任意位置之前 |
| SheetBeforeRightClick | 用户鼠标右击工作表任意位置之前 |
| WindowResize | Excel窗口大小变化时 |
| WindowActivate | Excel窗口被激活时 |
| WindowDeactivate | Excel窗口被取消激活时 |
[代码4]以下代码在Excel窗口发生变化时触发；在打开工作簿时输出工作簿文件名称。
'Excel窗口大小发生变化
Private Sub Application_WindowResize(Wb As Workbook, Wn As Window) Handles Application.WindowResize
System.Diagnostics.Debug.WriteLine("WindowResize")
End Sub
'当打开工作簿时，输出工作簿的名称
Private Sub Application_WorkbookOpen(Wb As Workbook) Handles Application.WorkbookOpen
Dim workBookName As String
workBookName = Application.ActiveWorkbook.Name
System.Diagnostics.Debug.WriteLine(workBookName)
End Sub
