Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
2009 connectés 

  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  Label clignotant dans une userform

 


 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

Label clignotant dans une userform

n°1918219
scaryfan
Apple Inside
Posté le 25-08-2009 à 16:57:29  profilanswer
 

:hello:  
 
J'ai besoin d'un peu d'aide !
 
J'ai une userform qui s'affiche à un moment donné lors de l'exécution d'une macro...
Dans cette userform, il y a :
  - un label : "Saisie obligatoire :"
  - une zone de texte : zone où la saisie est obligatoire
  - un bouton OK pour refermer la userform et enregistrer la saisie à un endroit donné d'une feuille
 
Bref, je souhaitera que le label "Saisie obligatoire" clignote... tout simplement.
 
J'ai bien trouvé un code sur le net mais il faut cliquer sur un bouton de la userform pour que le label clignote...
 

Code :
  1. Sub Clignotement()
  2. Dim TempsClign As Single
  3. Dim Depart As Single
  4. Dim Fin As Single
  5. Dim MemTimer As Single
  6. Const TempsAllum = 0.5
  7. Const TempsExtinc = 0.5
  8. TempsClign = 6
  9. Depart = Timer
  10. Do While Timer < Depart + TempsClign
  11.     MemTimer = Timer
  12.     Do While Timer < MemTimer + TempsExtinc
  13.         DoEvents
  14.         UserForm1.Etiquette1.ForeColor = &H8000000F
  15.     Loop
  16.     MemTimer = Timer
  17.     Do While Timer < MemTimer + TempsAllum
  18.         DoEvents
  19.         UserForm1.Etiquette1.ForeColor = &H80000012
  20.     Loop
  21.     DoEvents
  22. Loop
  23. End Sub


 
et moi, je veux qu'il clignote dès l'ouverture de la userform...
 
;)


---------------
iMac 4Ghz (fin 2015) RAM 16Go SSD 256Go SSD 2To
mood
Publicité
Posté le 25-08-2009 à 16:57:29  profilanswer
 

n°1918223
scaryfan
Apple Inside
Posté le 25-08-2009 à 17:00:02  profilanswer
 

En fait, je cherche une sorte de 'autoopen' lié à la userform... un peu pareil que quand on ouvre une feuille Excel et qu'il y a une macro Workbook_Open...
 
;)


---------------
iMac 4Ghz (fin 2015) RAM 16Go SSD 256Go SSD 2To
n°1922251
SuppotDeSa​Tante
Aka dje69r
Posté le 08-09-2009 à 16:30:40  profilanswer
 

Et sur le Activate de ton Form ?


---------------
Soyez malin, louez entre voisins !

Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  Label clignotant dans une userform

 

Sujets relatifs
Modifier une variable globale depuis un userform.Pb Listbox dans une Userform
VB label dynamiqueUserform : saisie dans une Textbox
Problème de code dans userform[C#] changer texte label avec conflit de thread
Dimension UserformForm et UserForm
Aide pour la programmation d'un userform remplissant une ligne ExcelMa variable publique est désinitialisée par mon UserForm
Plus de sujets relatifs à : Label clignotant dans une userform


Copyright © 1997-2022 Hardware.fr SARL (Signaler un contenu illicite / Données personnelles) / Groupe LDLC / Shop HFR