Combobox affiche un label

Bonjour,

Je viens encore vers vous, car je sais qu'il y a des génies ici de VBA.

Mon souci cette fois, je voudrais selon le choix d'une comboBox ( mots sélectionnés : soit Jour / am / nuit / matin) on affiche un label.

Merci à vous

Cordialement et Zen .

Bonjour

Sans fichier

Teste

Private Sub ComboBox1_Change()
  Me.Label1.Caption = ""
  If Me.ComboBox1.ListIndex = -1 Then Exit Sub
  Me.Label1.Caption = Me.ComboBox1
End Sub

je viens d'essayer ton code mais en fait je me suis mal exprimé le label à déjà une phrase défini par rapport au choix de la comboBox.

Alors comment l'afficher?

cordialement et reZen

Bonjour

Tu y indiques ce que tu as et ce que tu veux (fais des exemples)

re, voici un exemple

21combobox.xlsm (20.36 Ko)

Bonjour

Comme tu n'as pas fournis d'exemples, j'ai fait comme je le pensais

A vérifier

Merci à toi, vraiment sympa.

Bouddha62

Re, en fait cela fonctionne pas pour moi .

Car j'ai un userform déjà rempli avec des textbox, combobox, checkbox label etc....

Donc je n'arrive pas à placer ton code.

Me.Controls("[Label" & Me.ComboBox1.ListIndex + 1).Visible = True

Et dans private sub userform_Initialize cela ne fonctionne pas non plus

bouddha62

Bonjour

Comme d'ici je ne vois pas l'erreur

On va tester si c'est la numérotation des Labels

Tu renumérotes tes 3 Label du plus haut vers le plus bas : Label1001, Label1002, Label1003

Dans le code tu remplaces Label1 par Label1001, Label2 par Label1002, Label3 par Label1003 (en tout 6 modifications)

Dans la macro Private Sub ComboBox1_Change() tu modifies la ligne correspondante

Me.Controls("Label" & Me.ComboBox1.ListIndex + 1001).Visible = True

Pour mieux comprendre voici ci-joint mon dossier en pj.

Et le problème se trouve sur l'userform page Horaires


re, en pj

29gpec1-copie.xlsm (138.07 Ko)

Bonjour à toi aussi

A tester

Génial cela fonctionne correctement.

Merci à toi

Bouddha62

Rechercher des sujets similaires à "combobox affiche label"