Mousedown en deux fois

[didic]

Bonjour le forum,
A l'ouverture de mon classeur, le Thisworkbook fini par: Range('Z5').Select

Après, dans ma feuille, j'ai plusieurs objets dont une image. j'ai une procédure quand je click dessus:
Private Sub Image_mousedown(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
Range('Z10').Value = 0
Application.CutCopyMode = False
Call sprog(X, Y)
End Sub
Quand je clicke dessus, la 1ère fois, je suis obligé de clicker deux fois, pas un double click, pour que la procédure de l'évènement(mousedown) se déclanche.
Voyez-vous le bug?

Mersi pour votre aide.
didic

 

[Charly2]

Bonjour Didic, bonjour à toutes et à tous 🙂

Je vois que tu n'as pas beaucoup de réponse(s) :huh: . Personnellement, j'ai repris ton code et j'ai testé sur mon PC (XL 2k), et je n'ai pas réussi à reproduire ton problème de click : il fonctionne dès le premier !

Si tu pouvais mettre en ligne ton fichier (en ayant supprimé les données confidentielles), nous pourrions peut-être plus facilement tester ton code.

A+ 😉