Microsoft Excel

Herbers Excel/VBA-Archiv

Mausklicks systemweit erfassen - verbesserung

Betrifft: Mausklicks systemweit erfassen - verbesserung von: chris b
Geschrieben am: 15.09.2004 09:44:16

Hallo VBALer,
habe mir ein Programm geschrieben das mir Mausklicks systemweit überwacht.
Das funktioniert auch wunderbar bis auf das ich nicht erfassen kann wie lange die Maus geklickt wird.
Wenn ich denn sleep 500 befehl nicht hätte würde er mir bei einem Mausklick der etwas länger ist 10 mal Left Click in die textdatei schreiben.:(
Und das will ich nicht.
Vieleicht kann mir jemand helfen.

If GetAsyncKeyState(VK_LBUTTON) Then
If klick = False Then
klick = True
Else
Print #1, "Left Click"
Sleep 500
End If
End If

If GetAsyncKeyState(VK_RBUTTON) Then
If klick = False Then
klick = True
Else
Print #1, "Right Click"
Sleep 500
End If
End If

  


Betrifft: AW: Mausklicks systemweit erfassen - verbesserung von: Piet
Geschrieben am: 15.09.2004 22:32:49

Kein Excelproblem!

Piet


 

Beiträge aus den Excel-Beispielen zum Thema "Mausklicks systemweit erfassen - verbesserung"