Maus activieren im Arbeits-Blatt

Sub Maus-Ein
.......
End Sub
Maus_Aus
.......
end sub

Besser noch wäre wenn ich mit Hilfe von Pixel Kooridinaden den Mauszeiger bewegen und durch einem simulierten Maustaste 1 Klick eine Celle oder ein Objekt activieren könnte. Das wäre Genial.

Sub Maus(x,y) .......
Befehle zum Mauszeiger auf Kooridinaden x,Y zu setzen.
Befehl für den Simulierten Maustasten 1 Click
Befehl zum Activieren der Zelle oder des Objektes.
Dann wäre das Genial und genau das was ich seit wochen Probiere.
End Sub