Hallo Nochmal
Was auch ne Möglichkeit wäre das man die Position des Mauszeigers beim öffnen einer UserForm ganz nach rechts in den Bildschirmrand verlagert. Dort sieht man die maus ja auch nicht. Ist vieleicht einfacher? Hab aber keinen Schimmer wie ich die Mausposition angebe.
Grüsse
Dirk
AW: Mauszeiger ausblenden
16.08.2005 14:50:47
Excelmania
Hallo nochmal
Habs bereits selbst rausgefunden:
Ne API Funktion:
Private Declare Function SetCursorPos Lib "user32" (ByVal X As Long, ByVal Y As Long) As Long
und dann ein button klick:
Private Sub cmdbtn_Mausweg_Click()
SetCursorPos 1200, 500
End Sub
Und schon ist die Maus weg.
Ok werde das nächste mal mal etwas besser googeln bevor ich was poste ;-)
Grüsse
Dirk
Anzeige
AW: Mauszeiger ausblenden
16.08.2005 14:51:15
Galenzo
hilft die Sanduhr?
Application.Cursor = xlWait 'Sanduhr einschalten
'...
Application.Cursor = xlDefault 'Sanduhr ausschalten
Viel Erfolg!