Label clignotant

[MEDIALYS]

Bonjour,
Je souhaite faire clignoter un label en VBA.
Quelqu'un connaît la formule ?
Merci par avance.

 

[jp14]

Bonjour

Voici une méthode.

JP [file name=clignotant.zip size=14320]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/clignotant.zip[/file]

 

[myDearFriend!]

Bonsoir MEDIALYS, jp14,

Ci-joint un autre exemple sur le sujet...

Cordialement, [file name=mDF_AlerteClignotante_20060310221102.zip size=10135]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/mDF_AlerteClignotante_20060310221102.zip[/file]

 

[CISCO]

Re : Label clignotant

Bonsoir

Merci pour ce fichier MDF. Comme d'habitude venant de toi, très intéressant.

Quelqu'un pourrait-il me dire comment on définit le dessin sur la feuille "dessin", ou comment on peut changer la forme déja en place, ou comment on peut attribuer le clignotement à un autre dessin sur la même feuille ?

Merci d'avance

@ plus

 

[phlaurent55]

Re : Label clignotant

Bonjour Cisco,

si c'est pour faire apparaître le message,
Remplace la macro présents dans Private Sub Workbook_Open() par ceci:

Private Sub Workbook_Open()
    ThisWorkbook.Sheets("Dessin").Shapes("Alerte").Visible = True
    ThisWorkbook.Sheets("Commentaire").Range("I4").Comment.Visible = True
End Sub

N'oublie pas de remettre l'ancien code après les modifs effectuées sur la forme et avant sauvegarde

à+
Philippe

 

[CISCO]

Re : Label clignotant

Bonsoir à tous

Merci phlaurent55 pour ta réponse.

C'est pour pouvoir faire clignoter d'autres dessins.

Autrement dit, ma question est : "Comment fait-on comprendre à la macro ce que représente le terme "Alerte" dans .Shapes("Alerte") ?" Je ne vois pas où on nomme ce dessin Alerte....

@ plus

 

[phlaurent55]

Re : Label clignotant

Re,

voir fichier joint

réalisé avec 2007 et sauvegardé en version 2003
j'espère que ça va pas déconner

à+
Philippe

 

[CISCO]

Re : Label clignotant

Bonjour à tous

Merci Phlaurent55 🙂. Je n'arrivai pas à changer le nom du dessin directement dans la zone nom, mais maintenant, c'est OK.

@ plus