Linke Maustaste mit VBA clicken
alexander
ich habe ein kleines Makro geschrieben um automatisch in einem anderen Programm etwas zu aktualsieren. Wie ich die Maus über den Bildschirm bewege habe ich bereits herausgefunden. Leider finde ich nicht, wie ich das clicken der linken Maustaste auslöse.
Weiß jemand Rat
Sub gagsasg()
Call SetCursorPos(420, 150) 'Listenname
-> hier sollte jetzt die linke Maustaste geclickt werden
SendKeys "M16-3420"
SendKeys "{ENTER}"
Call SetCursorPos(920, 555) 'Wählen
Call SetCursorPos(1120, 785) 'Knopf anwählen
End Sub
zugehörige Funktion
'API-Funktion deklarieren
Public Declare
Function SetCursorPos Lib "user32" (ByVal X As Long, ByVal Y As Long) As Long
'Nur bei Verwendung von CenterCursor nötig:
Public Declare
Function GetWindowRect Lib "user32" (ByVal hWnd As Long, Rect As Rect) As Long
Public Type Rect
Left As Long
Top As Long
Right As Long
Bottom As Long
End Type
Vielen Dank akex