Valeur des controls label

thomlau

XLDnaute Occasionnel
Bonjour à tous
J'espère que le week-end commence bien pour vous.

Voilà mon problème :

Dans un Userform, j'ai 192 labels (rien que ça!), et je voudrais qu'à l'initialisation de l'USF, ces 192 labels prennent la valeur de chaque cellule d'un tableau composé de 192 cellules.
De plus, ci la valeur de la cellule est égale à "REPOS", le label prend la couleur orange par exemple.

C'est réalisable pour ma part, mais en faisant pour chaque label :

Label1.Caption = Sheets("planning").range("B1").value
if Sheets("planning").range("B1").value = "REPOS" then
Label1.BackColor = &H000080FF&​
End If

Bon ceci à faire 192 fois....ça risque d'être long, c'est pourquoi, une fois de plus je fais appel à votre savoir.

D'avance merci si vous pouviez automatisé cette tâche.
 

thomlau

XLDnaute Occasionnel
Re : Valeur des controls label

Bonjour le forum, bonjour Skoobi.

Il n'y a pas de blanc avant ou après le mot repos.
Et même s'il y en avait quelques uns, ce serait vraiment un manque de chance pour qu'il soit posotionnés une ligne sur deux. Je crois plutôt que le code selectionne 1 ligne sur 2, tu crois pas ?

Je mange et je réétudie le code.

Bon après-midi.
 

thomlau

XLDnaute Occasionnel
Re : Valeur des controls label

Rectification :

Par acquis de conscience, j'ai viré tout le code après le code qui nous intéresse....
Résultat : Ca fonctionne.

Je vais donc revoir tout ceci.

Excusez-moi de vous avoir perdre du temps et merci encore.

@ bientôt
 

thomlau

XLDnaute Occasionnel
Re : Valeur des controls label

Bonsoir @ toutes et à tous

Mon problème est résolu.

Je tiens à remercier les personnes qui ont contribué à cette réussite : Banzai, Skoobi, Pierrot93 ainsi que ce forum merveilleux!.
J'ai corrigé le code de mon projet, de plus il est allégé et surtout j'ai appris, ce qui n'est pas négligeable.

Bonne continuation et encore merci pour ce forum GÉNIAL
 

Discussions similaires

Statistiques des forums

Discussions
312 161
Messages
2 085 843
Membres
103 003
dernier inscrit
Maxmarie14