用户激活或更改图表时触发图表事件。图表工作表上的事件在默认情况下是可用的。若要查看工作表的事件过程,请用鼠标右键单击工作表标签,再从快捷菜单上选择“查看代码”。从“过程”下拉列表框中选择事件名称。
Activate DragPlot | MouseDown |
注意 若要编写嵌入图表的事件处理过程,就必须在类模块中用 WithEvents 关键字创建新的对象。有关详细信息,请参阅嵌入图表事件的用法。
本示例在用户更改数据点的值时,更改数据点的边框颜色。
Private Sub Chart_SeriesChange(ByVal SeriesIndex As Long, _
ByVal PointIndex As Long)
Set p = ActiveChart.SeriesCollection(SeriesIndex). _
Points(PointIndex)
p.Border.ColorIndex = 3
End Sub