VBA : figer le curseur de la souris

[dionys0s]

Bonjour le forum

j'aurais aimé savoir s'il est possible de figer le curseur de la souris durant l'exécution d'une macro. Peu importe qu'elle soit visible ou non, il faut juste qu'elle ne puisse pas bouger avant la fin de la macro.

D'avance merci pour vos lumières

 

[dionys0s]

Re : VBA : figer le curseur de la souris

Re le forum

si d'aventure certains internautes cherchaient à faire ça, voici ce que j'ai trouvé en fouinant (dernier post de ce thread : http://www.vbforums.com/

Private Declare Function BlockInput Lib "user32" (ByVal fBlock As Long) As Long
Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
Private Sub Form_Activate()
'KPD-Team 2000
'URL: [url=http://www.allapi.net/]allapi.net[/url]
'E-Mail: [email]KPDTeam@Allapi.net[/email]
DoEvents
'block the mouse and keyboard input
BlockInput True
'wait 10 seconds before unblocking it
Sleep 10000
'unblock the mouse and keyboard input
BlockInput False
End Sub

C'est un bon début mais reste à faire en sorte que la suite de la macro tourne en même temps que le curseur et le clavier sont figés.

Je suis ouvert à toute proposition mais je continue mes recherches

 

[mutzik]

Re : VBA : figer le curseur de la souris

bonjour,

mets ton code à la place de sleep ...
ou appelle l'autre macro à cet endroit (mettre juste le nom de la macro, pas le sub)

 

[dionys0s]

Re : VBA : figer le curseur de la souris

😱

le manque de sommeil sans doute...

Merci ^^