Mousedown mit rechtem Button und Shifttaste
04.02.2020 13:13:27
Andrea
ich möchte mit dem Mousedown-Ereignis (rechte Maustaste und Shift-Taste) gedrückt eine Prozedur aufrufen. Irgendwie gelingt es mir mit Shift nicht. Die normalen Maus-Button (1,2 und 4) kann ich aktivieren.
Hier noch mein Makro:
Private Sub MeinMakro_MouseDown(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As _
Single, ByVal Y As Single)
If Button = 2 And Shift = 2 Then
MsgBox "Maus rechts und Shift wurden gedrückt"
End If
End Sub
Andrea