Logo GNT
Actualités Tests & Guides Bons Plans
Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11
Entraide Applications Microsoft Office Excel Utilisation d'un combobox

Utilisation d'un combobox

3 réponses
Avatar
stephanie thibault
Bonjour,

Impossible de comprendre comment marche les combobox !
J'ai cr=E9=E9 un userform avec 6 combobox.
Pour que mon userform s'affiche, j'ai fait:
Sub test()
UserForm1.Show
End Sub

Mais apr=E8s je ne sais pas comment faire pour r=E9cup=E9rer les valeurs
entr=E9es dans chaque box.

J'ai fait
Private Sub Valider_Click()
Label1.Caption =3D ComboBox1.Value
Label2.Caption =3D ComboBox2.Value
Label3.Caption =3D ComboBox3.Value
Label4.Caption =3D ComboBox4.Value
Label5.Caption =3D ComboBox5.Value
Label6.Caption =3D ComboBox6.Value
End Sub

Mais =E7a ne marche pas.

Apr=E8s, j'aimerais faire:
si combobox1.value=3DA et combobox.value2=3DB alors ne garder que les
lignes contenant A ou B dans les colonnes A et B.

Comment puis-je faire ???

Merci
Signaler un problème avec ce contenu

3 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
MichD
Bonjour,

Un fichier Exemple pour un combobox, c'est le même principe
pour chacun des combobox... http://cjoint.com/?AEcpoJuGtke


MichD
--------------------------------------------
"stephanie thibault" a écrit dans le message de groupe de discussion :


Bonjour,

Impossible de comprendre comment marche les combobox !
J'ai créé un userform avec 6 combobox.
Pour que mon userform s'affiche, j'ai fait:
Sub test()
UserForm1.Show
End Sub

Mais après je ne sais pas comment faire pour récupérer les valeurs
entrées dans chaque box.

J'ai fait
Private Sub Valider_Click()
Label1.Caption = ComboBox1.Value
Label2.Caption = ComboBox2.Value
Label3.Caption = ComboBox3.Value
Label4.Caption = ComboBox4.Value
Label5.Caption = ComboBox5.Value
Label6.Caption = ComboBox6.Value
End Sub

Mais ça ne marche pas.

Après, j'aimerais faire:
si combobox1.value=A et combobox.value2=B alors ne garder que les
lignes contenant A ou B dans les colonnes A et B.

Comment puis-je faire ???

Merci
Avatar
stephanie thibault
On 2 mai, 15:15, "MichD" wrote:
Bonjour,

Un fichier Exemple pour un combobox, c'est le même principe
pour chacun des combobox...http://cjoint.com/?AEcpoJuGtke

MichD
--------------------------------------------
"stephanie thibault"  a écrit dans le message de groupe de discussion :


Bonjour,

Impossible de comprendre comment marche les combobox !
J'ai créé un userform avec 6 combobox.
Pour que mon userform s'affiche, j'ai fait:
Sub test()
UserForm1.Show
End Sub

Mais après je ne sais pas comment faire pour récupérer les valeurs
entrées dans chaque box.

J'ai fait
Private Sub Valider_Click()
Label1.Caption = ComboBox1.Value
Label2.Caption = ComboBox2.Value
Label3.Caption = ComboBox3.Value
Label4.Caption = ComboBox4.Value
Label5.Caption = ComboBox5.Value
Label6.Caption = ComboBox6.Value
End Sub

Mais ça ne marche pas.

Après, j'aimerais faire:
si combobox1.value=A et combobox.value2=B alors ne garder que les
lignes contenant A ou B dans les colonnes A et B.

Comment puis-je faire ???

Merci



Merci.
Et comment je fais pour vider mon formulaire ?
J'ai fait au début de mon programme:
'For i = 1 To 6
'If ComboBox & i <> Empty Then ComboBox1.Clear
'Next i
Mais ça ne marche pas.
Avatar
MichD
Bonjour,

Pour vider un combobox, cela dépend de la méthode que tu utilises pour
définir son contenu.

Si tu emploies la propriété "RowSource" du combobox, tu dois faire comme ceci :
Le Mot "Me" désigne le module de classe que représente un module formulaire.

'-----------------------------
For i = 1 To 6
If Me.Controls("ComboBox" & i).RowSource = ""
Next i
'-----------------------------

Si tu as employé la méthode AddItem pour renseigner ton combobox, fais comme ceci :
For i = 1 To 6
If Me.Controls("ComboBox" & i).Clear
Next i


MichD
--------------------------------------------