微信免费做邀请函模版网站,设计师用什么软件设计效果图,网站服务器收费,优化网站广告优化版权声明#xff1a;本文为博主原创文章#xff0c;转载请在显著位置标明本文出处以及作者网名#xff0c;未经作者允许不得用于商业目的。
4 其他事件
针对插件的事件主要有Startup、Shutdown这两个事件#xff0c;在第2节中已经讲解。在开发窗口中#xff0c;选择对象…版权声明本文为博主原创文章转载请在显著位置标明本文出处以及作者网名未经作者允许不得用于商业目的。
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
