Excel 鼠标不';如果MouseDown出现在同一个图表专用代码中,则不会激发
我在一张纸上有一张图表。我希望在左键按下时显示标签,然后在左键返回时消失 但是,如果两个事件处理程序都存在,那么MouseDown将触发,而MouseUp则不会。如果我引用MouseDown处理程序的注释,MouseUp将启动 其他奇怪的事情也会发生,比如在图表上点击两三下Excel就会崩溃。这让我发疯了。下面是两个事件处理程序。我已经最小化了代码Excel 鼠标不';如果MouseDown出现在同一个图表专用代码中,则不会激发,excel,vba,Excel,Vba,我在一张纸上有一张图表。我希望在左键按下时显示标签,然后在左键返回时消失 但是,如果两个事件处理程序都存在,那么MouseDown将触发,而MouseUp则不会。如果我引用MouseDown处理程序的注释,MouseUp将启动 其他奇怪的事情也会发生,比如在图表上点击两三下Excel就会崩溃。这让我发疯了。下面是两个事件处理程序。我已经最小化了代码 Private Sub Chart_MouseDown(ByVal Button As Long, _ ByVal Shift As
Private Sub Chart_MouseDown(ByVal Button As Long, _
ByVal Shift As Long, ByVal X As Long, ByVal Y As Long)
Me.Labels.Add(X - 100, Y - 100, 60, 30).Characters.Text = "This is a test"
End Sub
Private Sub Chart_MouseUp(ByVal Button As Long, _
ByVal Shift As Long, ByVal X As Long, ByVal Y As Long)
Dim i
For Each i In Me.Shapes
i.Delete
Next i
End Sub