嵌入图表事件的用法.docxVIP

嵌入图表事件的用法 默认情况下，图表工作表的事件都是可用的。但在使用代表嵌入图表的 Chart 对象事件之前，必须新建一个类模块并声明一个带有事件的 Chart 类型对象。例如，假定创建了新的类模块并将其命名为 EventClassModule 。该模块内应包含下列代码。 Public WithEvents myChartClass As Chart 在带事件声明了新的对象之后，该对象将出现在类模块的“对象”下拉列表框 中；此时就可为该对象编写事件过程了 （在“对象”下拉列表框中选定新对象后，“过程”下拉列表框中将列出该对象的有效事件）。 在事件过程运行之前， 必须将类模块中声明的对象与嵌入图表连接起来。 可在任意的模块中用下列代码完成这一操作。 Dim myClassModule As New EventClassModule Sub InitializeChart() Set myClassModule.myChartClass = _ Worksheets(1).ChartObjects(1).Chart End Sub 运行了 InitializeChart 过程之后，类模块中的 myChartClass 对象将指向第一张工作表上的第一个嵌入图表， 并且当事件发生时，类模块中的事件过程将运行。 上页： Excel VBA 教程： Application 在文档中使用 A