Appeler une valeur précise dans ComboBox
Résolu
sarache
Messages postés
32
Statut
Membre
-
sarache Messages postés 32 Statut Membre -
sarache Messages postés 32 Statut Membre -
Salut à tous !!
S'il vous plait, j'ai une question à propos de VBA, j'ai commencé à développer un Userform, j'ai utilisé ComboBox mais le problème que j'ai rencontré c'est : je veux appeler une valeur précise dans la liste de ComboBox. exemple qui montre ce que je veux:
if Range("B" & i) = ComboBox_nom then
"""''' afficher la valeur de ComboBox"""""
Remarque : j'ai plusieurs ComboBox!
comment je vais faire?
Merci d'avance :)
S'il vous plait, j'ai une question à propos de VBA, j'ai commencé à développer un Userform, j'ai utilisé ComboBox mais le problème que j'ai rencontré c'est : je veux appeler une valeur précise dans la liste de ComboBox. exemple qui montre ce que je veux:
if Range("B" & i) = ComboBox_nom then
"""''' afficher la valeur de ComboBox"""""
Remarque : j'ai plusieurs ComboBox!
comment je vais faire?
Merci d'avance :)
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
- Formule excel si contient texte alors valeur ✓ - Forum Excel
- Valeur ascii - Guide
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