Discussion :

[Dryss51]

Bonjour,


Je cherche depuis un petit moment comment faire clignoter un bouton en vba. Je voudrai qu'il clignote pendant un intervalle de temps ou mieux tant que le formulaire est ouvert. Sinon j'ai bien pensé a faire une boucle, mais je ne pense pas que se soit la solution idéale.


Si quelqu'un a une solution, je suis preneur. Je ne sais pas si je suis miro mais je n'arrive pas a trouvé de temporisation sous vba genre toute les secondes...

Merci d'avance

[Invité]

Bonjour,

Il existe dans chaque formulaire un Timer.

Si tu fais une recherche dans l'aide Access et sur le forum avec ce mot tu trouveras des exemples de codes.

Starec

[timoth]

J'ai vu qq posts sur ce sujet dans le forum, dont celui-ci. Regarde un peu l'évenement On_timer.

Jamais fait mais je pense que tu arriveras a te depatouiller avec ca.

[Invité]

Re

Tiens je voulais voir si cela marchait, je me suis un peu amusé :

Sur l'évènement Timer du formulaire tu mets

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
Private Sub Form_Timer()
    If Me.Commande0.ForeColor = vbWhite Then
        Me.Commande0.ForeColor = vbBlack
    Else
        Me.Commande0.ForeColor = vbWhite
    End If
End Sub

Tu remplaces Commande0 par le nom de ton bouton
Dans les propriétés du formulaire sur "Intervalle minuterie tu mets 500.

Ici je change la couleur du texte, tu ne peux faire clignoter l'ensemble du bouton (visible, invisible), cela plantera.

Starec

[Invité]

Re

Petit complément :

Quand tu veux que le clignotement commence tu mets

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Me.TimerInterval = 500

Et sur le click de ton bouton pour que le clignotement s'arrête tu mets

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Me.TimerInterval = 0

Starec

[Dryss51]

Merci beaucoup pour votre aide.