Appeler une valeur précise dans ComboBox
Résolu
sarache
Messages postés
31
Date d'inscription
Statut
Membre
Dernière intervention
-
sarache Messages postés 31 Date d'inscription Statut Membre Dernière intervention -
sarache Messages postés 31 Date d'inscription Statut Membre Dernière intervention -
A voir également:
- Appeler une valeur précise dans ComboBox
- Appeler en privé - Guide
- Nommez une application d'appel vidéo ou de visioconférence - Guide
- Logiciel gratuit calcul valeur nutritionnelle - Télécharger - Santé & Bien-être
- Valeur ascii - Guide
- La valeur relative de 9 dans 295 700 est - Forum Excel
6 réponses
Bonjour,
Pourriez-vous reformuler la question????
if Range("B" & i) = ComboBox_nom then
"""''' afficher la valeur de ComboBox""""" Ou ca???
A+
Pourriez-vous reformuler la question????
if Range("B" & i) = ComboBox_nom then
"""''' afficher la valeur de ComboBox""""" Ou ca???
A+
ok merci :)
j'ai créer un Userform dont j'ai 4 ComBox, je les ai rempli par des données existant dans une feuille, tous est marché, par la suite j'ai voulu afficher dans un MsgBox la valeur sélectionnée dans combobox, puisque j'ai 4 combobox il affiche juste la valeur sélectionner par une ComBox, est ce que c'est clair maintenant ?!!
j'ai créer un Userform dont j'ai 4 ComBox, je les ai rempli par des données existant dans une feuille, tous est marché, par la suite j'ai voulu afficher dans un MsgBox la valeur sélectionnée dans combobox, puisque j'ai 4 combobox il affiche juste la valeur sélectionner par une ComBox, est ce que c'est clair maintenant ?!!
Re,
pour chaque combobox
ex:
et ainsi de suite pour les quatre
pour chaque combobox
ex:
Private Sub ComboBox1_Change() MsgBox ComboBox1 & "-" & Combobox2 & "-" & Combobox3 & "-" & Combobox4 End Sub Private Sub ComboBox2_Change() MsgBox ComboBox1 & "-" & Combobox2 & "-" & Combobox3 & "-" & Combobox4 End Sub
et ainsi de suite pour les quatre
Non ce n'est pas ce que je veux :s
voilà le code
For i = 4 To Sheets("sheet1").Range("B" & Rows.Count).End(xlUp).Row
If Sheets("sheet1").Range("B" & i) = ComboBox_1 Then
MsgBox "le statut de " & ComboBox_1 & " est " & Sheets("sheet1").Range("H" & i)
ComboBox_1.ListIndex = -1
ElseIf Sheets("sheet1").Range("B" & i) = ComboBox_2 Then
MsgBox "le statut de " & ComboBox_2 & " est " & Sheets("sheet1").Range("H" & i)
ComboBox_2.ListIndex = -1
ElseIf Sheets("sheet1").Range("B" & i) = ComboBox_3 Then
MsgBox "le statut de " & ComboBox_3 & " est " & Sheets("sheet1").Range("H" & i)
ComboBox_3.ListIndex = -1
ElseIf Sheets("sheet1").Range("B" & i) = ComboBox_4 Then
MsgBox "le statut de " & ComboBox_4 & " est " & Sheets("sheet1").Range("H" & i)
ComboBox_4.ListIndex = -1
End If
Next
le problème c'est qu'il affiche juste valeur de combobox qui est la première a trouvé
mercii
voilà le code
For i = 4 To Sheets("sheet1").Range("B" & Rows.Count).End(xlUp).Row
If Sheets("sheet1").Range("B" & i) = ComboBox_1 Then
MsgBox "le statut de " & ComboBox_1 & " est " & Sheets("sheet1").Range("H" & i)
ComboBox_1.ListIndex = -1
ElseIf Sheets("sheet1").Range("B" & i) = ComboBox_2 Then
MsgBox "le statut de " & ComboBox_2 & " est " & Sheets("sheet1").Range("H" & i)
ComboBox_2.ListIndex = -1
ElseIf Sheets("sheet1").Range("B" & i) = ComboBox_3 Then
MsgBox "le statut de " & ComboBox_3 & " est " & Sheets("sheet1").Range("H" & i)
ComboBox_3.ListIndex = -1
ElseIf Sheets("sheet1").Range("B" & i) = ComboBox_4 Then
MsgBox "le statut de " & ComboBox_4 & " est " & Sheets("sheet1").Range("H" & i)
ComboBox_4.ListIndex = -1
End If
Next
le problème c'est qu'il affiche juste valeur de combobox qui est la première a trouvé
mercii
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question