搜索
查看: 2669|回复: 1

应用程序事件VBA大全

[复制链接]

977

主题

1093

帖子

1万

积分

管理员

Rank: 9Rank: 9Rank: 9

积分
15932
发表于 2018-12-31 15:42:57 | 显示全部楼层 |阅读模式
应用程序事件注释
NewWorkbook当新建一个工作簿时发生此事件
SheetActivate当激活任何工作表时发生此事件
SheetBeforeDoubleClick在双击任何工作表前发生此事件
SheetBeforeRightClick右键单击任何工作表前发生此事件
SheetCalculate在重新计算工作表时发生此事件
SheetChange更改任何工作表的单元格时发生此事件
SheetDeactivate当工作表失去焦点时发生此事件(离开工作表时)。
SheetFollowHyperlink在单击工作簿中的任何超链接时发生。
SheetPivotTableUpdate在更新数据透视表的工作表后发生。
SheetSelectionChange所选内容在任何工作表上更改时发生。
WindowActivate在激活任何工作簿窗口时发生。
WindowDeactivate工作簿的窗口变为非活动状态时,将产生本事件。
WindowResize改变工作簿窗口大小时发生
WorkbookActivate当激活任何工作簿时发生此事件
WorkbookAddinInstall工作簿为加载宏安装时发生此事件
WorkbookAddinUninstall当任一工作簿作为卸载宏时发生
WorkbookAfterXmlEmport在保存或导出工作簿中的XML数据之后发生此事件
WorkbookAfterXmlImport当刷新现有的XML数据链接或新的XML数据被导入任一打开的Excel工作簿之后时发生
WorkbookBeforeClose关闭任何工作簿前发生此事件
WorkbookBeforePrint在打印工作簿前发生此事件
WorkbookBeforeSave在保存任何工作簿前发生引事件
WorkbookBeforeXmlExport保存或导出XML数据前发生的事件
WorkbookBeforeXmlImport当刷新现有的XML数据链接或新的XML数据被导入任一打开的Excel工作簿之前时发生
WorkbookDeactivate当打开的工作簿转为非活动状态时发生此事件
WorkbookNewSheet 在任何打开的工作簿中新建工作表时发生此事件
WorkbookOpen当打开一个工作簿时发生此事件
WorkbookPivotTableCloseCloseConnection在数据透视表的链接关闭之后发生此事件
WorkbookPivotTableOpenCloseConnection在数据透视表的链接打开之后发生此事件
WorkbookRowsetCompletd如果用户在OLAP数据透视表上深化记录集或调用行集操作,则会发生WorkbookRowsetComplete事件
Workbooksync当作为“文档工作区”一部分的工作簿的本地副本与服务器上的副本进行同步时发生此事件
工作簿事件注释
Activate激活工作簿、工作表、图表工作表或嵌入式图表时发生此事件
AddinInstall当工作簿作为加载宏安装时,发生此事件
AddinUninstall当工作簿作为加载宏卸载时,发生此事件
AfterXmlExport在Excel保存或导出指定工作簿中的XML数据之后发生此事件
AfterXmlImport在刷新现有的XML数据链接或将新的XML数据导入到指定的Excel工作簿之后,发生此事件
BeforeClose在关闭工作簿之前,先产生此事件。如果该工作簿已经更改过,则本事件在询问用户是否保存更改之前产生。
BeforePrint在打印指定工作簿(或者其中的任何内容)之前,发生此事件
BeforeSave保存工作簿之前发生此事件
BeforeXmlExport在Excel保存或导出指定工作簿中的XML数据之后发生此事件
BeforeXmlImport在刷新现有的XML数据链接或将新的XML数据导入到指定的Excel工作簿之后,发生此事件
Deactivate图表、工作表或工作簿被停用时发生此事件
NewSheet当在工作簿中新建工作表时发生此事件
Open打开工作簿时,发生此事件
PivotTableCloseConnection数据透视表关闭与其数据源的链接后发生此事件
PivotTableOpenConnection数据透视表打开与其数据源的链接后发生此事件
RowsetComplete如果用户在OLAP数据透视表上深化记录集或调用行集操作,则会引发此事件
SheetActivate当激活任何工作表时发生 此事件
SheetBeforeDoubleClick当双击任何工作表时发生此事件,此事件先于默认的双击操作发生
SheetBeforeRightClick右键单击任一工作表时发生此事件,此事件先于默认的右键单击操作
SheetCalculate在重新计算工作表时或在图表上绘制更改的数据之生发生此事件
SheetChange当用户或外部链接更改了任何工作表中的单元格时发生此事件
SheetDeactivate当任何工作表停用时发生此事件
SheetFollowHyperlink单击Excel中的任何超链接时发生此事件
SheetPivotTableUpdate在数据透视表的工作表更新之后发生此事件
SheetSelectionChange任一工作表的选定区域发生更改时,将发生此事件
Sync当作为“文档工作区”一部分的工作表的本地副本与服务器上的副本进行同步时,发生此事件
WindowActivate工作簿窗口被停用时发生此事件
WindowDeactivate任何工作簿窗口调整大小时发生此事件
WindowResize任何工作簿窗口被停用时发生此事件
工作表事件注释
Activate激活工作簿,工作表,图表等发生的事件
BeforeDoubleClick在工作表中双击前发生的事件
BeforeRightClick右键单击工作表前发生的事件
Calculate工作表重新计算之后发生的事件
Change更改工作表中的单元格发生的事件
Deactivate工作表,图表停用(焦点离开)时发生的事件
FollowHyperlink单击工作表上的任意超链接时,发生此事件
PivotTableUpdate工作簿中的数据透视表更新后发生此事件
SelectionChange当工作表上选定区域发生改变时发生此事件

回复

使用道具 举报

977

主题

1093

帖子

1万

积分

管理员

Rank: 9Rank: 9Rank: 9

积分
15932
 楼主| 发表于 2018-12-31 15:44:30 | 显示全部楼层
'代码存储位置

'事件                                   代码位置
'-------------------------------------------------------
'应用程序-根据应用程序的动作进行控制    类模块或thisworkbook    对所有工作簿操作的相关事件
'工作簿-根据工作簿的动作进行控制        thisworkbook            对所有工作表操作的相关事件
'工作表-根据工作表的动作进行控制        sheet1.sheet2....       对工作表中所有单元操作的相关事件




'2.括号里面是参数(传回值用法)

'target:传递单元格对象(例子:禁止选择)
'sh:传递工作表对象(例子:新建工作表时提示更改名称)



'3.代码保护

'方法:工具-VBAProject属性-保护

回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

表格智创网

网站简介:表格智创网,是一家以表格设计和技能分享的专业社区,由会计帮帮网投资建设,尽专业,助提高专业技能。

表格智创网欢迎您!

联系我们

  • 工作时间:早上9:00-16:00
  • 客服电话:18668755857
  • 本站网址:www.excelwps.com
  • 淘宝店址:kjbbw.taobao.com

Powered by Discuz! X3.4 © 2001-2013 Comsenz Inc.

快速回复 返回顶部 返回列表