工作薄最新版工作表事件一览表
- 格式:doc
- 大小:122.50 KB
- 文档页数:21
第X课EXCEL基本事件1 什么是事件事件是一个对象可以辨认的动作,像单击鼠标或者按下某个键等等,并且可以编写某些代码针对此动作做出响应。
用户做动作或者程序代码的结果都可能导致事件的发生。
在VBA 中,可以激发事件的用户动作包括:切换工作表、选择单元格和单击鼠标等几十种。
事件发生时,将执行包含事件过程中的代码。
若用户没有定义某事件所调用的过程,那么当发生该事件时,就不会产生任何反应。
2 Excel中事件的分类Excel提供了非常多的事件,主要可以分为以下几类:(1)工作簿事件工作簿事件发生在特定的工作簿中,如Open(打开工作簿)、BeforeClose(关闭工作簿之前)和SheetActive(激活任何一张表)等。
工作簿事件的代码必须在Thiswork对象代码模块中编写。
(2)工作表事件工作表事件发生在特定的工作表中,如activate(激活工作表)、change(更改工作表中的单元格)和SelectionChange(工作表上的选定区域发生改变)等。
工作表事件的代码必须在对应工作表的代码模块中编写。
(3)窗体、控件事件新建的用户窗体及窗体上的控件可以响应很多事件,如Click(单击)、Change(控件内容更改)等,这类事件的代码必须编在相应的用户窗体代码模块中。
图表事件图表事件针对某个特殊的图表产生,例如Slect(选中了图表中的某个对象)和SeriesChange(改变了系列中某个数据点的值)。
不与对象关联的事件这类事件只有两个,分别是Online和Okey,根据时间和按钮来产生这两个事件。
3 工作薄事件当工作薄更改,工作薄中任何工作表更改,加载宏更改或数据透视表更改时,都将引发工作薄事件。
若要查看工作薄事件,可以双击“工程资源管理器”(excel工作环境下按组合键“Alt+F11”打开)窗口中的“ThisWorkBook”对象,打开“代码编辑器”窗口,在“过程”下拉列表框中选择事件名称。
Excel开发者模式学习(1)——对象、属性、⽅法、事件其实Excel就是触发和指定单元格学习路线⼀、理解⼯作簿、⼯作表、单元格等概念,弄清楚对象、属性⼆、了解软件操作⽅式,⽐如怎么调出开发模式、如何试运⾏等三、掌握常⽤的函数四、触发事件五、熟悉循环的使⽤六、实例操作⼀、概念对象Workbooks:⼯作簿worksheets:⼯作表Range:单元格区域cell:单元格对象就是存在的东西,是VBA处理的内容,包括⼯作薄、⼯作表、⼯作表上的单元格区域、图表等等。
对象可以相互包含,就像⼀个⽂件夹⾥可以包含多个⽂件夹⼀样,⽽这个⽂件夹⼜可以被其他的⽂件夹包含,⼀个⼯作薄对象可以包含多个多个⼯作表对象,⼀个⼯作表对象⼜可以包含多个单元格(或图表,图形等),这种对象的排列模式称为Excel的对象模型。
----------集合这个概念经常遇到,我理解的集合是对相同类型的对象的统称。
某中学有5000个学⽣,名字各不相同,我们对他都统称为某中学的学⽣,⽽不和⼀⼀去叫他们的名字,"某中学的学⽣"在这⾥是集合。
对象的引⽤,在Excel⾥,Workbooks集合包含在Application对象⾥,当我们要引⽤某⼯作薄的时候,要遵循从⼤到⼩的规则。
跟表⽰硬盘⾥的某个⽂件的位置⼀样,⽐如我们想引⽤D盘“我的⽂档”⽂件夹下的名为“我的VBA课程.doc”⽂件时要输⼊的是:D:\我的⽂档\我的VBA课程.doc同样,如果我们要引⽤名称为“mybook.xls”的⼯作薄时就是:Application.Workbooks(“mybook.xls”)和引⽤⽂件不同的是,VBA⾥使⽤的分隔符是点。
同理,当我们引⽤“mybook.xls”⾥⾯的⼯作表“mysheet”时应是:Application.Workbooks(“mybook.xls”).Worksheets(“mysheet”)可以继续延伸到下⼀层,引⽤“mybook.xls”⾥⼯作表“mysheet”⾥⾯的单元格区域“A1:D10”:Application.Workbooks(“mybook.xls”).Worksheets(“mysheet”).Range(“A1:D10”)但是并不是每⼀次引⽤都必须这么呆板,就像猪⼋戒不⽤每⼀次都去爬下⽔管道。
默写(中文版) - 百度文库(1)必修1Unit- 1(2)n. 调查;测验(3)合计(4)adj. 心烦意乱的;不安的;不适的vt. 使不安;使心烦(5)vt. 不理睬;忽视(6)vt. & vi. (使)平静; (使)镇定adj. 平静的;镇静的;沉着的(7)(使)平静下来;(使)镇定下来(8)不得不;必须(9)vt. (使)担忧;涉及;关系到n. 担心;关注; (利害)关系(10)关心;挂念(11)遛狗(12)adj. 松的;松开的(13)n. 兽医(14)经历;经受(15)n. 阿姆斯特丹(荷兰首都)(16)n. 荷兰(西欧国家)(17)犹太人的;犹太族的(18)adj. 德国的;德国人的;德语的n.德国人;德语(19)n. 纳粹党人adj. 纳粹党的(20)记下;放下;登记(21)n. 连续;系列(22)一连串的;一系列;一套(23)n. 基蒂(女名)(24)adv. 在户外;在野外(25)vt.迷住;迷惑(26)故意(27)为了……(28)n. 黄昏;傍晚(29)在黄昏时刻(30)vi. 打雷;雷鸣n.雷;雷声(31)adj. 整个的;完全的;全部的(32)adv. 完全地;全然地;整个地(33)n. 能力;力量;权力(34)面对面地(35)n. 窗帘;门帘;幕布(36)adj. 积满灰尘的(37)不再……(38)n. 伙伴;合作者;合伙人(39)vi. 安家;定居;停留vt. 使定居;安排;解决(40)vt. & vi. 遭受;忍受;经历(41)遭受;患病(42)n. 孤单;寂寞(43)n. 公路;大路(44)vi. & vt. 痊愈;恢复;重新获得(45)对……厌烦(46)vi. & vt. 捆扎;包装;打行李n. 小包;包裹(47)将(东西)装箱打包(48)n. 手提箱;衣箱(49)n. 玛戈(女名)(50)n. 大衣;外套(51)n. 十几岁的青少年(52)与……相处;进展(53)vi. & n. 闲话;闲谈(54)相爱;爱上(55)adv. 确实如此;正是;确切地(56)vi. 不同意(57)adj. 感激的;表示谢意的(58)n. & vt. 不喜欢;厌恶(59)参加;加入(60)n. 提示;技巧;尖;尖端;小费vt. 倾斜;翻倒(61)adv. 第二;其次(62)vt. 交换(63)n. 项目;条款(64)必修1Unit- 2(65) n.地下人行道;<美>地铁(66) n.电梯;升降机(67) n. <英>汽油(68) n.汽油;气体;煤气;毒气(69) adj.官方的;正式的;公务的(70) n.航行;航海(71) vt.征服;占领(72) 因为;由于(73) adj.本国的;本地的n.本地人;本国人(74) n.艾米(女名)(75) 走近;上来;提出(76) n. <美> 公寓住宅;单元住宅(77) adv.实际上;事实上(78) 公元(79) vt.以……为根据n.基部;基地;基础(80) 现在;目前(81) adj.逐渐的;逐步的(82) adv.逐渐地;逐步地(83) n.丹麦语adj.丹麦的;丹麦人的;丹麦语的(84) vt.使富裕;充实;改善(85) n.词汇;词汇量;词表(86) 莎士比亚(英国剧作家)(87) 利用;使用(88) n.拼写;拼法(89) 塞缪尔·约翰逊(英国作家,批评家)(90) 诺厄·韦伯斯特(美国词典编纂家)(91) adj.较后的;后半的; (两者中)后者的(92) n.本身;本体;身份(93) adj.流利的;流畅的(94) adv.流利地;流畅地(95) n.新加坡(东南亚国家)(96) n.马来西亚(东南亚国家);马来群岛(97) 例如……;像这种的(98) adj.频繁的;常见的(99) adv.常常;频繁地(100) n.使用;用法;词语惯用法1 (101) n.& vt.命令;指令;掌握(102) n. & vt.请求;要求(103) n.方言(104) n.词语;表示;表达(105) adj.中西部的;有中西部特性的(106) adj.非洲的;非洲人的;非洲语言的(107) adj.西班牙的;西班牙人的;西班牙语的n.西班牙人;西班牙语(108) 扮演一个角色;参与(109) adj.东方的;东部的(110) adj.东南方的;来自东南的(111) adj.西北方的;来自西北的(112) vt.辨认出;承认;公认(113) n. <英>卡车(=<美>truck)(114) n.罗丽(女名)(115) n.休斯顿(美国城市) (116) n.德克萨斯州(美国州名) (117) n.口音;腔调;重音(118) n.布福德(姓氏;男名) (119) n.莱斯特(姓错;男名) (120) n.鲶鱼(121) n.闪电(122) adv. 直接;挺直adj.直的;笔直的;正直的(123) n.街区;块;木块;石块(124) n.出租车(125)必修1Unit- 3(126) n.日记;杂志;定期刊物(127) n.运送;运输vt.运输;运送(128) vt.更喜欢;选择某事物(而不选择其他事物)(129) n.不利条件;不便之处(130) n.费用(131) n.路线;路途(132) n.湄公河(133) vi.流动;流出n.流动;流量(134) 从那以后(135) vt.说服;劝说(136) vi.骑自行车(137) vi.毕业n.大学毕业生(138) adv.最后;终于(139) n.时间表;进度表vt.为某事安排时间(140) adj.喜爱的;慈爱的;宠爱的(141) 喜爱;喜欢(142) n.缺点(143) adj.顽固的;固执的(144) vt.组织;成立(145) 关心;忧虑;惦念(146) n.细节;详情(147) n.来源;水源(148) vt.决定;确定;下定决心(149) adj.坚决的;有决心的(150) 改变主意(151) n.旅行;旅程(152) n.海拔高度;高处(153) 下决心;决定(154) 投降;屈服;让步(155) n.地图;地图集(156) n.冰河;冰川(157) adj.西藏的;藏族的;藏族人的n.(西)藏语;西藏人;藏族人(158) n.急流(159) n.(山)谷;流域(160) n.瀑布(161) vi.缓慢而行;踱步n.一步;速度;步调(162) n.弯;拐角vt.使弯曲vi.弯身;弯腰(163) n.(指河流等)蜿蜒缓慢流动(164) n.三角洲(165) n.态度;看法(166) n.珠穆朗玛峰(167) vi.(指液体)沸腾;(水)开(168) n.& vt.预测;预报(169) n.小包;包裹(170) n.保险(171) n.羊毛;毛织品(172) 照常(173) adj.可信赖的;可靠的(174) n.风景;视野;观点;见解vt.观看;注视;考虑(175) n.牦牛(176) n.枕头;枕垫(177) n.午夜;子夜(178) 在午夜(179) n.火焰;光芒;热情(180) prep.在……下面(181) n.老挝(东南亚国家)(182) n.老挝人adj.老挝(人)的(183) n.庙宇;寺庙(184) n.洞穴;地窖(185)必修1Unit- 4(186) n.地震(187) n.地震(188) 立刻;马上(189) n.井(190) n.裂缝;噼啪声vt. & vi.(使)开裂;破裂(191) adj.发臭的;有臭味的(192) n.农场;农家(193) n.管;导管(194) vi.爆裂;爆发n.突然破裂;爆发(195) n.百万(196) n.事件;大事(197) 仿佛;好像(198) 结束;终结(199) n.民族;国家;国民(200) n.运河;水道(201) n.蒸汽;水汽(202) n.污垢;泥土(203) n.废墟;毁灭vt.毁灭;使破产(204) 严重受损;破败不堪(205) n.苦难;痛苦(206) adj.极度的(207) vt.损害;伤害(208) n.幸存者;生还者;残存物(209) vt.破坏;毁坏;消灭(210) n.砖;砖块(211) n.水坝;堰堤(212) n.轨道;足迹;痕迹(213) adj.无用的;无效的;无益的(214) vt. & vi.(使)震惊;震动n.休克;打击;震惊(215) n. & vt.援救;营救(216) vt.使陷入困境n.陷阱;困境(217) n.电;电流;电学(218) n.灾难;灾祸(219) 掘出;发现(220) vt.埋葬;掩埋;隐藏(221) n.矿;矿山;矿井(222) n.矿工(223) n.掩蔽;掩蔽处;避身处(224) 许多;大量的(225) n.标题;头衔;资格(226) n.记者(227) n.条;棒;条状物(228) n. & vt.损失;损害(229) vt.使惊吓;吓唬(230) adj.受惊的;受恐吓的(231) adj.令人恐惧的(232) n.祝贺;(复数)贺词(233) n.裁判员;法官vt.断定;判断;判决(234) adv.真诚地;真挚地(235) vt.表示;表达n.快车;速递(236) n.要点;大纲;轮廓(237) n.报刊的大字标题(238) n.骑自行车的人(239)必修1Unit- 5 (240) 纳尔逊·曼德拉(前南非共和国总统) (241) n.质量;品质;性质(242) adj.热心肠的(243) adj.吝啬的;自私的;卑鄙的(244) adj.积极的;活跃的(245) adj.慷慨的;大方的(246) adj.随和的温和宽容的(247) n.自我;自身(248) adj.自私的(249) adj.无私的;忘我的(250) adv.无私地;忘我地(251) vt.(与to连用)献身;专心于(252) adj.忠实的;深爱的(253) 威廉·廷代尔(英国早期新教改革者) (254) n.《圣经》(255) 诺曼·白求恩(加拿大胸外科医师) (256) n.侵略者(257) vt.建立;建设(258) n.共和国;共和政体(259) n.法则;原则;原理(260) n.民族主义;国家主义(261) n.生计;谋生(262) 莫罕达斯·甘地(印度国民大会党领袖) (263) adj.和平的;平静的;安宁的(264) adj.巨大的;庞大的(265) n.飞跃;跳跃(266) n.人类(267) n.伊莱亚斯(男名)(268) n.律师(269) n.指导;领导(270) adj.法律的;依照法律的(271) n.费(会费、学费等);酬金(272) n.南非共和国有色人种的身份证(273) n.约翰内斯堡(南非城市)(274) 失业(275) adj.怀有希望的;有希望的(276) 非国大;非洲人国民大会;非洲民族会议(277) n.青年;青年时期(278) 同盟;联盟;联合会(279) 青年团(280) n.舞台;阶段;时期(281) vt. & vi.投票;选举n.投票;选票;表决(282) vt.进攻;攻击;抨击(283) n.暴力;暴行(284) 事实上(285) 使充气;爆炸(286) adj.相等的;平等的(287) 在危险、受罚、痛苦、忧虑等的处境中(288) adj.乐意的;自愿的(289) adj.不公正的;不公平的(290) 求助于;致力于(291) n.引用语;语录(292) vt.释放;发行(293) 丧失勇气或信心(294) 罗本岛(295) vi.逃脱;逃走;泄露(296) n.毛毯;毯子(297) vt.教育;训练(298) adj.受过教育的;有教养的(299) 当权;上台(300) vi.请求;乞求(301) n.亲戚;亲属(302) n.恐怖;可怕的人;恐怖时期;恐怖活动(303) n.残忍;残酷(304) n.报酬;奖金vt.酬劳;奖赏(305) n.特兰斯凯(南非东南部一地区) (306) 设立;建立(307) vt.判决;宣判(308) 被判处……(徒刑)(309) [前缀] 反;抗;阻(310) adj.反黑人的(311) 开普敦(南非立法首都)(312) n.总统;会长;校长;行长(313) 诺贝尔和平奖(314) n.意见;看法;主张(315) 必修2Unit- 1(316) adj.文化的(317) n.遗物;遗迹;纪念物(318) adj.稀罕的;稀有的;珍贵的(319) adj.贵重的;有价值的(320) vi.幸免;幸存;生还(321) n.花瓶;瓶(322) n.朝代;王朝(323) 泰姬陵(324) n.象牙(325) n.龙(326) n.琥珀;琥珀色(327) 寻找(328) 腓特烈·威廉一世(普鲁士国王)(329) n.(史)普鲁士(位于北欧)(330) vt.使吃惊;惊讶(331) adj.令人吃惊的(332) vt.挑选;选择(333) n.蜜;蜂蜜(334) n.设计;图案;构思vt.设计;计划;构思(335) adj.奇特的;异样的vt.想象;设想;爱好(336) n.风格;风度;类型(337) v. 装饰;装修(338) n.珠宝;宝石(339) n.艺术家(340) vi.属于;为……的一员(341) 属于(342) 彼得大帝(俄国皇帝)(343) 作为报答;回报(344) n.沙皇(345) n.群;组;军队(346) n.圣彼得堡(俄罗斯城市)(347) n.接待;招待会;接收(348) 叶卡捷琳娜二世(俄国女皇)(349) 处于交战状态(350) vt.移动;搬开(351) 少于(352) adj.木制的(353) n.怀疑;疑惑vt.怀疑;不信(354) n.哥尼斯堡(俄罗斯港市Kaliningrad的旧称)(355) 波罗的海(356) n.神秘;神秘的事物(357) adj.以前的;从前的(358) prep.值得的;相当于……的价值n.价值;作用adj. [古]值钱的(359) vt.重建(360) adj.本地的;当地的(361) adv.分离地;分别地(362) 拆开(363) n.列宁格勒(苏联城市)(364) n.绘画;画(365) n.城堡(366) 温莎城堡(英国著名城堡)(367) n.审判;审讯;试验(368) n.目击者;证人(369) n.根据;证据(370) 简·哈兹克(男名) (371) 捷克共和国(东欧国家)(372) vi.爆炸(373) n.入口(374) 汉斯·布朗(男名) (375) n.水手;海员;船员(376) vi.下沉;沉下(377) 安娜·帕特罗夫(女名)(378) n.少女;女仆(379) n.柏林(德国首都)(380) 看重;器重(381) 约翰·韦伯(男名) (382) adj.非正式的(383) n.争论;辩论vi.争论;辨论(384) 必修2Unit- 2(385) adj.古代的;古老的(386) vi.比赛;竞争(387) n.竞争者(388) 参加;参与(389) n.奖章;勋章;纪念章(390) 代表;象征;表示(391) n.吉祥物(392) 帕萨尼亚斯(男名;古希腊人名)(393) n.希腊(394) adj.希腊(人)的;希腊语的n.希腊人;希腊语(395) adj.巫术的;魔术的;有魔力的(396) n.志愿者;志愿兵adj.志愿的;义务的vt. & vi.自愿(397) n.祖国;本国(398) adj.规则的;定期的;常规的(399) n.基础;根据(400) n.运动员;运动选手(401) vt. & vi.容许;承认;接纳(402) n.奴隶(403) adv.现今;现在(404) n.(pl) 体操;体能训练(405) n.(pl) 体育运动;竞技(406) n.(露天大型)体育场(407) n.体育馆;健身房(408) 也;又;还(409) vt.做东;主办;招待n.主人(410) n.责任;职责(411) n.橄榄树;橄榄叶;橄榄枝;橄榄色(412) n.花圈;花冠;圈状物(413) vt.取代;替换;代替(414) n.座右铭;格言;警句(415) adj.快的;迅速的(416) n.想像性;相似点(417) n.雅典(希腊首都)(418) vt. & vi.收费;控诉n.费用;主管(419) 主管;看管(420) adj.物理的;身体的(421) vt.罚款(422) n.海报;招贴(423) vt. & vi.做广告;登广告(424) n.亚特兰大(女名;城市名)(425) n.公主(426) n.光荣;荣誉(427) vi.讨价还价;讲条件n.便宜货(428) n.王子(429) adj.没有希望的;绝望的(430) n.希波墨涅斯(男名;古希腊人名) (431) adj.愚蠢的;傻的(432) n.女神(433) n.疼痛;痛苦(434) 陆续地;一个接一个地(435) vi. & vt.应受(报答或惩罚);值得(436) n.敲击者;(足球的)前锋(437) 必修2Unit- 3 (438) n.算盘(439) n.计算器(440) 个人电脑;个人计算机(441) n.手提电脑(442) 掌上电脑;个人数码助理(443) adj.分析的(444) vt.计算(445) adj.普遍的;通用的;宇宙的(446) vt.简化(447) n.总数;算术题;金额(448) 查尔斯·巴比奇(英国数学教授) (449) n.(电脑)操作员;接线员(450) adj.合逻辑的;合情理的(451) adv. 逻辑上;合逻辑地;有条理地(452) n.工艺;科技;技术(453) adj.科技的(454) n.革命(455) adj.人造的;假的(456) n.智力;聪明;智能(457) adj.智能的;聪明的(458) 艾伦·图灵(英国数学家)(459) vt.解决;解答(460) adj.数学的(461) 从……时起(462) n.真实;事实;现实(463) n.设计师(464) adj.私人的;个人的;亲自的(465) adv.就个人而言;亲自(466) n.管;管子;电子管(467) n.晶体管(468) n.碎片;芯片(469) 结果(470) adj.总的;整个的n.总数;合计(471) adv.完全地;整个地(472) 如此……以致于……(473) n.网络;网状物474) n.网(475) n.应用;用途;申请(476) n.金融;财经(477) adj.可移动的;机动的(478) n.火箭(479) vt. & vi.探索;探测;探究(480) n.火星(481) adv.无论如何;即使如此(482) n.目标;目的;球门;(进球)得分(483) n.幸福;快乐(484) 人类(485) adj.支持的;支撑的(486) vt.下载(487) n.程序员;程序师(488) n.病毒(489) n.机器人(490) vi.& vt.发信号n.信号(491) n.同伴;伙伴(492) n.名古屋(日本港市)(493) n.西雅图(美国城市)(494) n.类型vt.& vi.打字(495) 在某种程度上(496) n.教练(497) vi. (arose, arisen)出现;发生(498) 在……的帮助下(499) adj.电子的(500) n.外观;外貌;出现(501) n.性格;特点(502) n.拖把vt.用拖把拖;擦(503) 处理;安排;对付(504) 看守;监视(505) adj.顽皮的;淘气的(506) n.侄女;甥女(507) vt.损坏;宠坏(508) 必修2Unit- 4 (509) n.野生动植物(510) n.保护(511) adj.野生的;野的;未开发的;荒凉的(512) n.栖息地;(动植物的)自然环境; (513) vt.& vi.恐吓;威胁(514) vi.& vt 减少; (使)变小;或变少(515) vt.危害;使受到危险(516) 灭亡;逐渐消失(517) n.损失;遗失;丧失(518) n.保护区(519) vt.& vi.打猎;猎取;搜寻(520) n.地域;地带;地区(521) 和平地;和睦地;安祥地(522) 在危险中;垂危(523) n.戴茜(女名) (524) n.种类;物种(525) n.地毯(526) vi.回答;响应;做出反应(527) adj.远的;远处的(528) n.毛皮;毛;软毛(529) n.羚羊(530) n.津巴布韦(非洲东南部国家) (531) n.(痛苦或忧虑的)减轻或解除;减轻痛苦的事物(532) 如释重负;松了口气(533) n.笑;笑声(534) 突然笑起来;大声笑了出来(535) n.仁慈;宽恕;怜悯(536) adj.确定的;某一;一定(537) n.重要(性) (538) 世界野生生物基金会(539) vt.擦;摩擦(540) 保护……不受……(危害)(541) n.蚊子(542) n.千足虫(543) n.昆虫(544) vt.包含;容纳;容忍(545) adj.强大的;有力的(546) vt.影响;感动;侵袭(547) n.注意;关注;注意力(548) 注意(549) vt.鉴赏;感激;意识到(550) vi.成功vt.接替;继任(551) n.印度尼西亚(东南亚岛国)(552) n.犀牛(553) adj.安全的;可靠的(554) n.收入(555) vt.雇用;利用(时间、精力等) (556) n. & vt.损害;危害(557) 麋鹿(558) vt. & vi.咬;叮;刺痛(559) n.灭绝;消亡(560) n.恐龙(561) 形成;产生(562) n.县;郡(563) vt.检查;视察(564) adj.没料到的;意外的(565) n.事件;事变(566) n.灰尘;尘土;尘埃(567) 按照;根据……所说(568) n.毛里求斯(非洲东部岛国)(569) n.消失(570) adj.凶猛的;猛烈的(571) 以致于;结果(572) n.结局;结尾(573) adv.忠诚地;忠实地(574) (非洲产)疣猴,髯猴(575) 必修2Unit- 5(576) adj.古典的;古典文艺的(577) vt.& vi.滚动; (使)摇摆n.摇晃;卷;卷形物;面包圈(578) 摇滚乐(579) n.管弦乐队(580) n.说唱乐(581) adj.民间的(582) n.爵士音乐(583) adj.唱诗班的;合唱队的(584) 门基乐队(585) n.音乐家(586) 梦见;梦想;设想(587) n.卡拉OK录音;自动伴奏录音(588) vt.假装;假扮(589) 说实在地;实话说(590) vt. & vi.系上;缚上;附加;连接(591) 认为有(重要性、意义);附上;连接(592) vt.(使)组成;形成;构成(593) n.名声;名望(594) n.过路人;行人(595) vt.赚;挣得;获得(596) adj.额外的;外加的(597) n.工具;器械;乐器(598) vt. & vi.表演;履行;执行(599) n.表演;演奏(600) n.酒馆;酒吧(601) n.现金(602) 用现金;有现钱(603) n.工作室;演播室(604) n.百万富翁;富豪(605) 戏弄(606) n.男演员;行动者(607) vi.依赖;依靠(608) 依赖;依靠(609) n.广播;播放vi. & vt.广播;播放(610) adj.幽默的;诙谐的(611) adj.熟悉的;常见的;亲近的(612) 熟悉;与……熟悉起来(613) 大约(614) 打碎;分裂;解体(615) vt.再统一;再联合;重聚(616) adj.吸引人的;有吸引力的(617) n.加;增加;加法(618) 另外;也(619) 分类(620) n.兴奋;刺激(621) n.歌谣;情歌;民谣(622) adv.在晚上;在夜里;(口)很快;一夜之间(623) vt.浸;蘸(624) n.蝌蚪(625) n.百合;百合花(626) adj.自信的;确信的(627) n.弗雷迪(男名) (628) adj.简短的;简要的n.摘要;大纲(629) adv. 简要地;短暂地(630) n.投入;热爱(631) adv.然后;后来(632) n.邀请;招待(633) n.胡须(634) adj.敏感的;易受伤害的;灵敏的(635) adj.痛苦的;疼痛的(636) 最重要;首先(637) 必修3Unit- 1 (638) 发生(639) n. 美;美人(640) n. & vt. & vi. 收获;收割(641) n. 庆祝;祝贺(642) n. 狩猎者;猎人(643) vi. & vt. (使)饿死;饿得要死(644) n. 起源;由来;起因(645) adj. 宗教上的;信奉宗教的;虔诚的(646) adj. 季节的;季节性的(647) n. 祖先;祖宗(648) n. (日本)盂兰盆节(649) n. 坟墓;墓地(650) n. 熏香;熏香的烟(651) 纪念;追念(652) n. 墨西哥(拉丁美洲国家)(653) n. 节日;盛宴(654) n. 头脑;头骨(655) n. 骨;骨头(656) n. 万圣节前夕;诸圣日前夕(657) n. 信任;信心;信仰(658) 盛装;打扮;装饰(659) n. 诡计;恶作剧;窍门vt. 欺骗;诈骗(660) 搞恶作剧;诈骗;开玩笑(661) n. 诗人(662) 哥伦布日(663) n. 到来;到达;到达者(664) 克利斯朵夫·哥伦布(意大利航海家)(665) vt.获得;得到(666) n. 独立;自主(667) adj. 独立的;自主的(668) vt. & vi. & n.搜集;集合;聚集(669) n. 农业;农艺;农学(670) adj. 农业的;农艺的(671) n.奖;奖品vt. 授予;判定(672) n.产品;(尤指)农产品(673) n. 雄禽;公鸡(674) vt.赞美;钦佩;羡慕(675) adj.充满活力的;精力充沛的;积极的(676) to 期望;期待;盼望(677) n. 狂欢节;(四旬斋前的)饮宴狂欢;嘉年华(会) (678) adj. 月的;月亮的;阴历的(679) n. 游行;阅兵;检阅(680) 日夜;昼夜;整天(681) n. 衣服(682) n. 基督徒;信徒adj. 基督教的;信基督教的(683) n. 耶稣(684) n.樱桃;樱桃树(685) n.花vt.开花(686) 好像(687) 玩得开心(688) 习惯;风俗(689) adj.遍及全世界的;世界性的(690) n. 玫瑰花蕾(691) n.愚人;白痴;受骗者vt.干傻事;开玩笑adj.傻的(692) n. 必要性;需要(693) n.许可;允许(694) n. 预言;预报;预告(695) n.样子;方式;时尚(696) n.特立尼达岛(697) n.卡拉(女名)(698) n.哈利(男名)(699) n.(汽车等)停放(700) 停车场(701) n. 圣瓦伦廷节;情人节(702) 出现;到场(703) 守信用;履行诺言(704) 屏息;屏气(705) vi. 道歉;辩白(706) vt. & vi.淹没;溺死;淹死(707) n.悲哀,悲伤(708) adj. 明显的;显而易见的(709) vt.擦;揩;擦去(710) vt. & vi.(使)迂回(711) n.牧群;兽群(712) 银河(713) n.喜鹊(714) vi.哭泣;流泪n.哭;哭泣(715) n. 广播员;告知者;报幕员(716) 出发;动身;使爆炸(717) vt.提醒;使想起(718) 使……想起……(719) 原谅;饶恕(720) 必修3Unit- 2 (721) n.日常饮食vi.节食(722) n. 意大利式细面条(723) n.坚果;果仁(724) n. 肌肉;(食用)瘦肉(725) adj.给予保护的;保护的(726) n.豆;豆科植物(727) n.豌豆(728) n.黄瓜(729) n.茄子(730) n.辣椒;辣椒粉(731) n.蘑菇(732) n.桃子(733) n.柠檬(734) vt.平衡;权衡n.天平;平衡(735) 平衡膳食(736) vt. & n.烧烤;烤肉(737) n.羊肉(738) n. (印度)烤腌羊肉串;肉串上的肉块(739) adj.烤制的vt. &vi.烤;烘;烘烤(740) vt. 摇动;搅和(741) vt. & vi.油煎;油炸(742) vt.用旺火炒(或煎、煸)(743) vt.& vi. 应当;应该;aux. 应当;应该(744) 应当;应该(745) n.熏咸肉;腊肉(746) n. 可乐饮料(747) adj.含糖的;甜的(748) n.牌示;标记;符号(749) 体重减轻;减肥(750) vi.变细;减肥adj.苗条的;纤细的(751) n.好奇心(752) n.女主人;女主持人(753) adj.生的;未加工的(754) n.醋(755) 被放过;(做坏事)不受惩罚(756) n.谎话;谎言vi.说谎(757) 说谎(758) n.顾客;消费者(759) n.折扣(760) 赢回;重新获得(761) n.缺点;虚弱;弱点(762) n.强项;长处;力量(763) vt.咨询;请教;商量(764) n.纤维;纤维制品(765) vi.& vt.消化n.摘要;概要(766) adj. 有毒的(767) n.胡萝卜(768) n. 坏血病(769) n. 佝偻病(770) n. 过度肥胖(771) n. 维生素(772) n. 蛋白质(773) 谋生(774) n.债;债务(775) 欠债(776) vi.怒目而视;闪耀n.怒视;眩目的光(777) vi.& vt.窥探;秘密监视n.间谍;侦探(778) 暗中监视;侦查(779) vt.限制;限定n.界限;限度(780) adj.有限的(781) n.利益;好处vt. & vi.有益于;有助于;受益(782) n.胸部;乳房(783) n.大蒜(784) vi.叹息;叹气n.叹息;叹息声(785) vt. & vi.(使)联合;(使)结合(786) 削减;删节(787) 不久以后(788) 增加体重(789) n. 合作;协作(790) n. (烹调用的)材料;原料;成分(791) n. (食物的)味道与气味;特性(792) 必修3Unit- 3(793) 马克·吐温(美国作家)(794) n.出生地;故乡(795) n. 佛罗里达镇(位于密苏里州)佛罗里达州(美国州名)(796) 抚养;培养;教育;提出(797) n. 汉尼拔(美国城市)(798) n. 密苏里州(美国州名)(799) n. 密西西比河;密西西比州(美国州名)(800) n.小说;长篇故事adj.新奇的;异常的(801) n. 少年时代(802) n.奇遇;冒险(803) n. 汤姆·索亚(人名)(804) 哈克贝利·费恩(人名)(805) n.短语;词组;惯用语(806) n. 长度单位(六英尺)(807) n.著者;作家(808) 塞缪尔·兰霍恩·克莱门斯(人名) (809) n.(戏剧)一场;现场;场面;景色(810) n.讲述者,叙述者(811) n.罗德里克(男名)(812) n.奥利弗(男名) (813) n.赌;打赌vt. & vt.打赌;赌钱(814) 打赌(815) adj.贫困的;身无分文的(816) vi.漫游;漫步;漂泊(817) n.人行道(818) n.商人(819) vt. & vi.许可;允许;准许n.通行证;许可证;执照(820) adv. 在前;向前;提前(821) 前进;(用于祈使句)可以;往下说(822) 偶然;无意中;不小心(823) n.海湾(824) vi.凝视;盯着看(825) 盯着看;凝视(826) n.黄昏(827) n.过错;缺点;故障(828) vt.发现;认出n.斑点;污点;地点(829) n.船费(包括食宿);通道;(一)段(830) adj.未付款的;不受报酬的(831) vi. & vt.认为;说明;总计有n.说明;理由;计算;帐目(832) 导致;做出解释(833) n.大使馆;大使及其官员(834) vt. & vi.寻找;探索;寻求(835) n.耐性;忍耐(836) n.反面;对立面adj.相反的;相违的(837) 与此相反;正相反(838) n.慈善(团体);施舍(839) n.信封(840) adj.难以置信的(841) n.霍勒斯(男名)(842) n.(供煎、烤的)肉块;鱼排;牛排(843) n.菠萝(844) n.餐后甜点(845) n.数量(846) 冒险(847) adj.粗鲁的;无礼的(848) n.礼貌;举止;方式(849) vi.尖声叫n.尖叫声;喊叫声(850) adj.真的;真诚的(851) vt. & vi.发行(钞票等);发布(命令);出版(杂志等) (852) n.假货;欺骗adj.假的(853) n.破布;碎布(854) 衣衫褴褛(855) adv.真正地;确实;实在(856) 关于;至于(857) vi. & n.鞠躬;弯腰(858) n.理发师(859) 必修3Unit- 4(860) n.天文学(861) n.天文学家(862) adj.太阳的;日光的(863) n.系统;体系;制度(864) 太阳系(865) n.宗教;宗教信仰(866) n.学说;理论(867) 宇宙大爆炸;创世大爆炸(868) n.原子(869) pron.& n. & adj.<英>万亿;<美>十亿(870) n.球体;地球仪;地球(871) adj.全球性的;全世界的(872) adj.猛烈的;激烈的;强暴的(873) 及时;终于(874) n.碳(875) n.氮(876) n.蒸气;水蒸气(877) n.大气层;气氛(878) prep.不同;不像(879) adj.基本的;基础的(880) n.出席;到场;存在(881) vt. & vi.溶解;解散(882) adj.有害的(883) n.酸(884) n.链子;连锁;锁链(885) n.反应;回应(886) vi. & vt.乘;增加(887) n.氧(888) n.水生有壳动物(889) n.两栖动物(890) n.爬行动物;爬虫(891) 下蛋(892) n.恐龙(893) vi.存在;生存(894) n.哺乳动物(895) 产生;分娩(896) adv.因此;于是(897) 轮到某人;接着(898) n.二氧化物(899) 二氧化碳(900) 阻止;制止(901) n.谜;难题vt. &vi.(使)迷惑;(使)为难(902) n.生物学(903) n.生物学家(904) n.万有引力;重力(905) n.卫星;人造卫星(906) adj.温和的;文雅的(907) n.地质学家(908) n.物理学家(909) 挡住(光线) (910) adj.灭绝的;绝种的(911) n.气候(912) n.慧星(913) vi. & vt.碰撞;坠落(914) 艾萨克·牛顿(英国科学家)(915) 陈尔伯特·爱因斯坦(德裔美国科学家) (916) 斯蒂芬·霍金(英国科学家)(917) n.宇宙飞船(918) n. & vt.拉(力);拖;牵引力(919) vi. & vt.减少;减轻(920) 感到高兴;感到振奋(921) vi. & vt.(使)浮动;(使)漂浮n. 漂浮物(922) adv.失重地(923) n.小屋;船舱(924) n.质量;团;块;大量;<复>群众(925) 既然(926) 熟悉;掌握;理解(927) 突发;爆发(928) vt.用尽;耗尽;使精疲力尽(929) 密切注视;当心;提防(930) 必修3Unit- 5 (931) adj.多种文化的(932) 测验;问答比赛(933) n.加拿大人adj.加拿大的;加拿大人的(934) n.温哥华(加拿大城市)(935) n.多伦多(加拿大城市)(936) n.卡尔加里(加拿大城市)(937) n.渥太华(加拿大首都)(938) n.海狸(939) n.(北美洲)灰熊adj.灰色的;有灰斑的(940) adj.极地的;近极地的(941) n.企鹅(942) adj.首要的;主要的;基本的(943) n.大臣;部长(944) 首相;丞相(945) n.州长;总督(946) 与其;不愿(947) n.洲;大陆(948) n.行李(949) vi. & n.聊天;闲聊(950) n.景色;风景(951) adv.向东adj.向东的;朝东的(952) adv.向西adj.向西的;朝西上的(953) adv.向上地;上升的adj.上升的;向上的(954) vt. & vi.包围;围绕(955) 落基山脉(956) n.海港(957) vi. & vt.测量;衡量;判定n.计量制;计量单位;措施(958) prep. & adv. 在船、飞机、火车或公共汽车上(959) 定居;平静下来;专心于(960) 设法做(961) 看见;瞥见(962) n.鹰(963) n.(美国西部或加拿大)大西部赛马会(964) n.牛仔;牧童(965) 对……有天赋(966) prep. 在……之内(967) n.边界;国界;边沿vt.& vi.与……接壤;接近(968) adj.轻微的;微小的(969) adv.稍稍;轻微地(970) n.英亩(971) adj.城市的;市镇的(972) 桑德湾(973) 苏必利尔湖(974) n.位置;地方(975) 梵蒂冈城国(976) n.话题(977) vt. & vi.混合;调配(978) n.混合(物);混合状态(979) n.灌木(丛);矮树(丛)(980) n.枫;枫树(981) n.霜;霜冻(982) vt.证实;证明;批准(983) adj.富有的(984) n.距离;远方(985) 在远处(986) n.薄雾(987) adj.有薄雾的;模糊的(988) n.尼亚加拉(河;瀑布)(989) n.同学;校友(990) n.公用电话间;货摊;售货亭(991) adj.市区的adv.在市区;往市区(992) n.珍珠(993) n. & adj.广东人(的);广州人(的);广东话(的)(994) adv.接近;大约(995) n.黎明;拂晓;破晓(996) n.工作场所;工作地点(997) n.自助餐;饮食柜台(998) adj.宽阔的;广泛的(999) 圣劳伦斯河(1000) adv.在附近adj.附近的;邻近的(1001) n.传统;风俗(1002) vt . 使恐怖;恐吓(1003) adj.恐惧的;受惊吓的(1004) adj.欣喜的;高兴的;愉快的(1005) vt.使印象深刻;使铭记(1006) adj.给人深刻印象的;感人的(1007) 必修4Unit- 1(1008) n.成就;功绩(1009) 圣女贞德(法国民族女英雄)(1010) 伊丽莎白·弗赖伊(英国慈善家)(1011) n.教友派信徒;贵格会会员(1012) n.福利;福利事业(1013) n.项目;工程;规划(1014) n.学会;学院;协会(1015) 中国福利基金会(1016) n.专家;专业工作者(1017) vi.专攻;专门从事;专注于(1018) 简·古道尔(英国动物学家)(1019) n.(非洲)黑猩猩(1020) n.连接;关系(1021) 人类(1022) 乔迪·威廉斯(美国诺贝尔和平奖得者) (1023) n.运动;战役vi.作战;参加运动(1024) n.地雷(1025) n.组织;机构;团体(1026) 贡贝国家公园(位于坦桑尼亚)(1027) vt.& vi.举动; (举止或行为)表现(1028) 行为;举止;习性(1029) n.荫;阴凉处vt.遮住光线(1030) 离开;起程;出发(1031) adj.值得的;值得做的(1032) n.巢;窝(1033) n.联系;关系;结合;纽带(1034) vt.观察;观测;(1035) n.观察;观测(1036) n.童年;幼年时代(1037) adj.直言的;坦诚(1038) vt.& n.尊敬;11尊重;敬意(1039) vt.& vi.讨论;辩论;争论(1040) n.争论;争辩;争吵(1041) n.款待;娱乐;娱乐表演(1042) 过着……的生活(1043) n.人群;观众vt.挤满;使拥挤(1044) (想法、问题等)涌上心头;涌入脑海(1045) vt.鼓舞;激发;启示(1046) n.灵感;鼓舞(1047) n.& vt.支持;拥护(1048) 蔑视;瞧不起(1049) vi.谈到;查阅;参考(1050) 查阅;参考;谈到(1051) n.观众;听众;读者(1052) 碰巧;凑巧(1053) (偶然)遇见;碰见(1054) n.事业;生涯(1055) n.比率;速度(1056) n.疾病;恶心(1057) vt.计划;打算(1058) n.突发事件;紧急情况(1059) n.一代;一辈(1060) n.决心;果断(1061) n.仁慈;好意(1062) adj.考虑周到的(1063) n.考虑;体谅(1064) vt.递送;生(小孩儿);接生;发表(演说等)(1065) 继续;坚持(1066) adj.谦虚的;谦让的;适度的(1067) 必修4Unit- 2(1068) n.数据;统计;统计数字;统计资料(1069) adj.晒黑的(1070) vt.& vi.斗争;拼搏;努力(1071) n.十年;十年期(1072) adj.特级的;超(1073) adj.混合的;杂种的n.杂交种;混血儿(1074) n.产量;输出(1075) n.(植物的)品种;种类(1076) n.庄稼;农作物;产量(1077) n.饥饿;欲望vt. & vi.(使)饥饿(1078) adj.引起烦恼的;令人不安的(1079) vt.& vi.使变大;伸展(1080) vt.& vi.循环;流传(1081) n.越南(东南亚国家)(1082) 幸亏;由于;因为(1083) n.战役;战斗;较量;斗争vt.& vi.搏斗;奋斗(1084) vt.摆脱;除去(1085) 摆脱;除去(1086) 对……感到满意(1087) n.自由;自主(1088) 宁愿;宁可(1089) adj.因为;所以;因而(1090) vt.& vi.配备;装备(1091) n.高粱(1092) n.谷物;粮食;颗粒(1093) n.花生(1094) vt.& vi.输出;出口(1095) n.国籍(1096) n.工作;职业;占领(1097) n.性格;个性;人格(1098) vt.使迷惑;使为难(1099) vt.遗憾;惋惜n.遗憾;懊悔(1100) adj.化学的;关于化学的(1101) adj.有机的;器官的;组织的(1102) adj.肥沃的;富饶的(1103) n.肥料;化肥(1104) n.生产;制造(1105) n.细菌(1106) n.害虫;害兽;害鸟(1107) 逐渐增强;建立;开发(1108) 导致;造成(后果)(1109) n.营养;滋养;食物(1110) n.矿物;矿石(1111) n.发现;发觉(1112) n.焦点;中心点vt.集中;聚集(1113) 集中(注意力、精力等)于(1114) n.土壤(1115) vt.减少;减缩(1116) 使……免受(影响;害等);使……不含(有害物)(1117) n.大豆(1118) n.根;根源(1119) vt.浏览;略读(1120) vt.画底线标出;强调(1121) n.总结;摘要;概要(1122) n.评论;议论vi.& vt.表达意见;作出评论(1123) n.生产者;制片人(1124) adj.工业的;产业的(1125) 必修4Unit- 3(1126) n.幽默;滑稽(1127) n.故事、笑话等中的妙语;关键语(1128) adj.口头的12。
V B A工作薄工作表事件一览表集团标准化工作小组 [Q8QX9QT-X8QQB8Q8-NQ8QJ8-M8QMN]翻箱倒柜,无意中发现个好东东放到这里,大家查着也方便工作簿对象事件一览表当工作簿更改、工作簿中的任何工作表更改、加载宏更改或数据透视表更改时,将引发工作簿事件。
工作簿上的事件在默认情况下是可用的。
若要查看工作簿的事件过程,请用鼠标右键单击处于还原状态或最小化状态的工作簿窗口标题栏,再单击快捷菜单上的“查看代码”。
在“过程”下拉列表框内选择事件名称。
事件说明Activate激活工作薄时AddinInstall当工作簿作为加载宏安装时AddinUninstall工作簿作为加载宏卸载时BeforeClose关闭工作薄前BeforePrint打印工作薄(或其中任何内容)之前BeforeSave保存工作薄前Deactivate工作簿从活动状态转为非活动状态时NewSheet在工作簿中新建工作表时Open打开工作簿时PivotTableCloseConnection在数据透视表关闭与其数据源的连接之后PivotTableOpenConnection在数据透视表打开与其数据源的连接之后SheetActivate激活任何一张表时SheetBeforeDoubleClick双击任何工作表时SheetBeforeRightClick鼠标右键单击任一工作表时SheetCalculate工作表重新计算时SheetChange更改工作表中的单元格时SheetDeactivate任一工作表由活动状态转为非活动状态时SheetFollowHyperlink单击 Microsoft Excel 中的任意超链接时SheetPivotTableUpdate数据透视表的工作表更新之后SheetSelectionChange工作簿中的数据透视表更新之后WindowActivate工作簿的窗口激活时WindowDeactivate工作簿的窗口变为非活动状态时WindowResize工作簿窗口调整大小时本示例在打开工作簿时将 Microsoft Excel 窗口最大化。
翻箱倒柜,无意中发现个好东东放到这里,大家查着也方便工作簿对象事件一览表当工作簿更改、工作簿中的任何工作表更改、加载宏更改或数据透视表更改时,将引发工作簿事件。
工作簿上的事件在默认情况下是可用的。
若要查看工作簿的事件过程,请用鼠标右键单击处于还原状态或最小化状态的工作簿窗口标题栏,再单击快捷菜单上的“查看代码”。
在“过程”下拉列表框内选择事件名称。
事件? ? ? ? 说明Activate激活工作薄时AddinInstall当工作簿作为加载宏安装时AddinUninstall工作簿作为加载宏卸载时BeforeClose关闭工作薄前BeforePrint打印工作薄(或其中任何内容)之前BeforeSave保存工作薄前Deactivate工作簿从活动状态转为非活动状态时NewSheet在工作簿中新建工作表时Open打开工作簿时PivotTableCloseConnection在数据透视表关闭与其数据源的连接之后PivotTableOpenConnection在数据透视表打开与其数据源的连接之后SheetActivate激活任何一张表时SheetBeforeDoubleClick双击任何工作表时SheetBeforeRightClick鼠标右键单击任一工作表时SheetCalculate工作表重新计算时SheetChange更改工作表中的单元格时SheetDeactivate任一工作表由活动状态转为非活动状态时SheetFollowHyperlink单击 Microsoft Excel 中的任意超链接时SheetPivotTableUpdate数据透视表的工作表更新之后SheetSelectionChange工作簿中的数据透视表更新之后WindowActivate工作簿的窗口激活时WindowDeactivate工作簿的窗口变为非活动状态时WindowResize工作簿窗口调整大小时本示例在打开工作簿时将 Microsoft Excel 窗口最大化。
Excel-事件(Workbook、Worksheet、Range、OnKeyOnTime)⼀、Excel事件介绍Excel事件就是⼀个能被对象识别的操作。
当某个事件发⽣后⾃动运⾏的过程称为事件过程。
事件过程也是Sub过程。
实践过程必须写在特定对象所在的模块中,⽽且只有过程所在的模块⾥的对象才能触发这个事件。
事件过程名由Excel⾃动设置,以“对象名称_事件名称”的形式存在,不能更改。
⼆、Worksheet事件Worksheet事件是发⽣在Worksheet对象⾥的事件。
事件过程必须写在对应的Worksheet对象⾥,只有过程所在的Worksheet对象⾥的操作才能触发该事件。
1、Worksheet_Change事件:⾃动提⽰更改的内容Private Sub Worksheet_Change(ByVal Target As Range) '⼊参中Target代表被选中的单元格Application.EnableEvents = False '禁⽤事件If Target.Column = 1ThenMsgBox Target.Address & "单元格的值被修改为:" & Target.ValueEnd IfApplication.EnableEvents = True '启⽤事件End Sub2、Worksheet_SelectionChange事件:你选中了谁可以⽤此事件来记录Excel单元格修改前的旧值。
Private Sub Worksheet_SelectionChange(ByVal Target As Range)Dim oldvalue As StringMsgBox"当前选中的单元格区域为:" & Target.Addressoldvalue = Target.ValueIf Target.Column <> 1ThenCells(Target.Row, "A").SelectEnd IfEnd Sub3、Worksheet_Activate事件:⾃动提⽰⼯作表名Private Sub Worksheet_Activate()MsgBox"当前活动⼯作表为:" & End Sub4、Worksheet_Deactivate事件:禁⽌选中其他⼯作表Private Sub Worksheet_Deactivate()MsgBox"不允许选中" & & "⼯作表外的其他⼯作表"Worksheets("Sheet1").SelectEnd Sub5、Worksheet事件列表Worksheet对象⼀共有9个事件可供使⽤。
ExcelVBA解读(93):⼯作簿对象的SheetActivate、SheetDeact。
本⽂详细讲解Workbook对象的3个事件:SheetActivate事件、SheetDeactivate事件和SheetSelectionChange事件。
Workbook_SheetActivate事件当激活任意⼯作表时发⽣Workbook_SheetActivate事件。
其语法为:Workbook_SheetActivate(ByVal Sh As Object)说明:参数Sh,必需,表⽰被激活的⼯作表,可以是图表⼯作表或标准⼯作表。
在ThisWorkbook代码模块中输⼊下⾯的代码,当激活⼯作表时弹出⼀个显⽰该⼯作表名字的消息框:Private SubWorkbook_SheetActivate(ByVal Sh As Object)MsgBox '当前⼯作表是:' & End SubWorkbook_SheetDeactivate事件当使⼯作表变为⾮活动⼯作表时发⽣Workbook_SheetDeactivate事件。
其语法为:Workbook_SheetDeactivate(ByVal Sh As Object)说明:参数Sh,必需,表⽰变为⾮活动⼯作表的⼯作表,可以是图表⼯作表或标准⼯作表。
在ThisWorkbook代码模块中输⼊下⾯的代码,当使⼯作表变为⾮活动⼯作表时弹出⼀个显⽰该⼯作表名字的消息框:Private SubWorkbook_SheetDeactivate(ByVal Sh As Object)MsgBox '⾛了,⼯作表:' & End Sub当SheetActivate事件和SheetDeactivate事件都存在时,先发⽣SheetDeactivate事件,再发⽣SheetActivate事件。
Workbook_SheetSelectionChange事件当改变任意⼯作表(图表⼯作表除外)的单元格选择时发⽣Workbook_SheetSelectionChange事件。
目录第一章:Excel VBA基础 (4)1录制宏: (4)2用户自定义函数 (4)3 Excel对象模型 (4)集合 (5)属性 (5)方法 (5)事件 (5)4 VBA语言 (5)基本的输入输出 (5)调用函数和子过程 (5)括号和参数列表 (6)变量声明 (6)变量的作用域和生存期 (7)变量类型 (7)对象变量 (7)做出判断 (7)循环 (9)数组 (9)运行时错误处理 (10)第二章:Application对象 (10)1全局: (10)2 Active属性: (10)3 显示警告: (10)4 屏幕刷新: (10)5 Application的Evaluate方法: (10)6 InputBox: (11)7 状态栏: (11)8 SendKeys: (11)9 OnTime: (12)10 OnKey: (12)11 工作表函数: (12)12 Caller: (12)第三章:工作薄和工作表 (12)1 Workbooks集合: (12)添加Workbook对象 (13)从路径中获取文件名 (13)在相同目录中的文件 (13)覆盖现有的工作薄 (13)保存改变 (14)2 Sheets集合: (14)工作表(Worksheet) (14)工作表的复制和移动 (14)组合工作表 (14)3 Windows对象: (15)第四章:使用单元格区域 (15)1 Range对象的Activate方法和Select方法: (15)2 Range属性: (15)活动工作表中的单元格区域 (16)非活动工作表中的单元格区域 (16)Range对象的Range属性 (16)Cells属性 (17)Range对象的Item属性 (17)在Range中使用Cells (17)关于Range对象的Cells属性 (18)单个参数的单元格区域引用 (18)3 Offset 属性: (18)4 Resize属性: (18)5 SpecialCells方法: (18)确定最后一个单元格 (19)删除数字 (19)6 CurrentRegion属性 (19)7 End属性: (19)8 单元格区域求和: (19)9 Columns属性和Rows属性: (19)10 Count属性 (19)11 Areas属性 (20)12 Areas集合 (21)13 Union方法和Intersect方法: (21)14 空单元格: (21)第五章:使用名称 (21)1 Name对象 (21)2 Names属性 (21)s 属性 (22)s属性 (22)s属性 (22)3 Name对象的Name属性: (23)4 命名单元格区域 (23)创建全局名称 (23)创建局部名称: (23)5 在名称中存储值 (23)6 存储数组 (24)7 隐藏名字: (24)8 处理命名的单元格区域: (24)9 搜索名称: (24)第六章:数据列表 (25)1 结构化数据: (25)2 排序单元格区域 (25)3 创建表 (25)4 排序表 (25)5 自动筛选 (25)第七章:数据透视表 (25)第八章:图表 (25)第九章:事件过程 (25)VBA是一种面向对象的程序设计语言,与Visual Basic程序设计语言在结构化和处理对象方面相同。
工作簿对象事件一览表当工作簿更改、工作簿中的任何工作表更改、加载宏更改或数据透视表更改时,将引发工作簿事件。
工作簿上的事件在默认情况下是可用的。
若要查看工作簿的事件过程,请用鼠标右键单击处于还原状态或最小化状态的工作簿窗口标题栏,再单击快捷菜单上的“查看代码”。
在“过程”下拉列表框内选择事件名称。
本示例在打开工作簿时将 Microsoft Excel 窗口最大化。
Sub Workbook_Open()Application.WindowState = xlMaximizedEnd SubActivate 事件激活一个工作簿、工作表、图表或嵌入图表时产生此事件。
Private Sub object_Activate()object Chart、Workbook、或者Worksheet。
有关对Chart对象使用事件的详细信息,请参阅图表对象事件的用法。
说明切换两个显示同一个工作簿的窗口时,将产生 WindowActivate 事件,但不产生工作簿的 Activate 事件。
新建窗口时不产生本事件。
示例当激活工作表时,本示例对 A1:A10 区域进行排序。
Private Sub Worksheet_Activate()Range("a1:a10").Sort Key1:=Range("a1"), Order:=xlAscendingEnd SubAddinInstall 事件当工作簿作为加载宏安装时,产生此事件。
Private Sub Workbook_AddinInstall()示例当指定工作簿作为加载宏安装时,本示例将一个控件添加到常用工具栏中。
Private Sub Workbook_AddinInstall()With mandbars("Standard").Controls.Add.Caption = "The AddIn's menu item".OnAction = "'ThisAddin.xls'!Amacro"End With End SubEnd SubAddinUninstall 事件当工作簿作为加载宏卸载时,产生此事件。
Private Sub Workbook_AddinUninstall()说明卸载加载宏时,该加载宏并不自动关闭。
示例当指定工作簿作为加载宏卸载时,本示例将 Microsoft Excel 最小化。
Private Sub Workbook_AddinUninstall()Application.WindowState = xlMinimizedEnd SubBeforeClose 事件在关闭工作簿之前,先产生此事件。
如果该工作簿已经更改过,则本事件在询问用户是否保存更改之前产生。
Private Sub Workbook_BeforeClose(Cancel As Boolean)Cancel 当事件产生时为False。
如果该事件过程将本参数设为True,则停止对工作簿的关闭操作,工作薄仍处于打开状态。
示例本示例将 BeforeClose 事件的响应设置为保存工作簿的任何更改。
Private Sub Workbook_BeforeClose(Cancel as Boolean)If Me.Saved = False Then Me.SaveEnd SubBeforePrint 事件在打印指定工作簿(或者其中的任何内容)之前,产生此事件。
Private Sub Workbook_BeforePrint(Cancel As Boolean)Cancel 当事件产生时为False。
如果该事件过程将本参数设为True,则当该过程运行结束之后不打印工作簿。
示例本示例在打印之前对当前活动工作簿的所有工作表重新计算。
Private Sub Workbook_BeforePrint(Cancel As Boolean)For Each wk in Worksheetswk.CalculateNextEnd SubBeforeSave 事件保存工作簿之前产生此事件。
Private Sub Workbook_BeforeSave(ByVal SaveAsUi As Boolean, Cancel As Boolean)SaveAsUi 如果显示“另存为”对话框,则为True。
Cancel 当事件产生时为False。
如果该事件过程将本参数设为True,则该过程执行结束之后不保存工作簿。
示例本示例在保存工作簿之前询问用户是否保存。
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, _Cancel as Boolean)a = MsgBox("Do you really want to save the workbook?", vbYesNo) If a = vbNo Then Cancel = TrueEnd SubDeactivate 事件图表、工作表或工作簿从活动状态转为非活动状态时产生此事件。
Private Sub object_Deactivate()object Chart、Workbook或者Worksheet。
有关对Chart对象使用事件的详细信息,请参阅Chart 对象事件的用法。
示例本示例当工作簿转为非活动状态时,对所有打开的窗口进行排列。
Private Sub Workbook_Deactivate()Application.Windows.Arrange xlArrangeStyleTiledEnd SubNewSheet 事件当在工作簿中新建工作表时产生此事件。
Private Sub Workbook_NewSheet(ByVal Sh As Object)Sh 新工作表。
可以是一个Worksheet或Chart对象。
示例本示例将新建的工作表移到工作簿的末尾。
Private Sub Workbook_NewSheet(ByVal Sh as Object)Sh.Move After:= Sheets(Sheets.Count)End SubOpen 事件打开工作簿时,将产生本事件。
Private Sub Workbook_Open()示例每次打开工作簿时,本示例都最大化 Microsoft Excel 窗口。
Private Sub Workbook_Open()Application.WindowState = xlMaximizedEnd SubPivotTableCloseConnection 事件发生在数据透视表关闭与其数据源的连接之后。
Private Sub expression_PivotTableCloseConnection(ByVal Target As PivotTable)expression 引用在类模块中带有事件声明的Workbook类型对象的变量。
Target 必需。
选定的数据透视表。
示例本示例显示一则消息,说明数据透视表与其数据源的连接已经关闭。
本示例假定您已在类模块中声明了带有事件的Workbook类型的对象。
Private Sub ConnectionApp_PivotTableCloseConnection(ByVal Target As PivotTable)MsgBox "The PivotTable connection has been closed."End SubPivotTableOpenConnection 事件发生在数据透视表打开与其数据源的连接之后。
Private Sub expression_PivotTableOpenConnection(ByVal Target As PivotTable)expression 引用在类模块中带有事件声明的Workbook类型对象的变量。
Target 必需。
选定的数据透视表。
示例本示例显示一则消息,说明数据透视表与其数据源的连接已经打开。
本示例假定您已在类模块中声明了带有事件的Workbook类型的对象。
Private Sub ConnectionApp_PivotTableOpenConnection(ByVal Target As PivotTable)MsgBox "The PivotTable connection has been opened."End SubSheetActivate 事件当激活任何一张表时产生此事件。
Private Sub object_SheetActivate(ByVal Sh As Object)object Application对象或Workbook对象。
Sh 激活的表。
可以是一个Chart对象或Worksheet对象。
示例本示例显示每一张激活的表的名称。
Private Sub Workbook_SheetActivate(ByVal Sh As Object)MsgBox End SubSheetBeforeDoubleClick 事件当双击任何工作表时产生此事件,此事件先于默认的双击操作发生。
Private Sub object_SheetBeforeDoubleClick(ByVal Sh As Object, ByVal Target As Range, ByVal Cancel As Boolean)object Application对象或Workbook对象。
有关对Application 对象使用事件的详细信息,请参阅Application 对象事件的用法。
Sh 代表该工作表的Worksheet对象。
Target 当双击事件发生时最靠近鼠标指针的单元格。
Cancel 当事件发生时为False。
如果事件过程将该参数设为True,则该过程执行完之后将不进行默认的双击操作。
说明图表不产生该事件。
示例本示例关闭默认的双击操作。
Private Sub Workbook_SheetBeforeDoubleClick(ByVal Sh As Object, _ByVal Target As Range, ByVal Cancel As Boolean)Cancel = TrueEnd SubSheetBeforeRightClick 事件当用鼠标右键单击任一工作表时产生此事件,此事件先于默认的右键单击操作。
Private Sub object_SheetBeforeRightClick(ByVal Sh As Object, ByVal Target As Range, ByVal Cancel As Boolean)object Application对象或Workbook对象。