Re
Alors la méthode (tirée par les cheveux) utilisée ici :
* je crée un gif animé (nommé ici rouge_vert.gif) que je place dans le même dossier que le fichier excel
* dans l'Usf, j'ajoute un bouton ordinaire
* par dessus ce bouton, je place un WebBrowser (plus petit que le bouton)
* dans le code de l'Usf, à son ouverture le code :
Private Sub UserForm_Activate()
Me.WebBrowser1.Navigate ThisWorkbook.Path & "\Rouge_vert.GIF"
End Sub
Résultat :
[+] j'ai bien un bouton qui clignote sur mon Usf
[-] mais il faut cliquer sur la périphérie du WebBrowser pour bien cliquer sur le bouton (très bof-bof ...)
(il n'existe pas d'évènement WebBrowser_Clic en standard)
En bref : ça fait moyennement le job mais peut être que qqun d'autre proposera une meilleure solution ...
Pierre