Condition sur combobox
milas-logistique
Messages postés
23
Statut
Membre
-
milas-logistique Messages postés 23 Statut Membre -
milas-logistique Messages postés 23 Statut Membre -
Bonjour,
J'ai un problème avec mes ComboBox, je veux tester une condition sur le combobox je vous fais voir le code:
Private Sub CommandButton1()
If (ComboBox1.SelectedValue = "oui") Then CommandButton1 = 0.5
End If
End Sub
Private Sub UserForm_Initialize()
ComboBox1.AddItem ("oui")
ComboBox1.AddItem ("Non")
End Sub
J'ai un problème avec mes ComboBox, je veux tester une condition sur le combobox je vous fais voir le code:
Private Sub CommandButton1()
If (ComboBox1.SelectedValue = "oui") Then CommandButton1 = 0.5
End If
End Sub
Private Sub UserForm_Initialize()
ComboBox1.AddItem ("oui")
ComboBox1.AddItem ("Non")
End Sub
1 réponse
-
Bonjour,
Comme ceci :If ComboBox1 = "oui" Then
maisCommandButton1 = 0.5
ne veux pas dire grand chose car quel intérêt de mettre 0.5 dans un bouton ?-
-
Bonjour,
Si tu veux inventer ta syntaxe, cela ne va pas fonctionner. Pour faire une recherchev en VBA il faut utiliser :résultat = Application.WorksheetFunction.VLookup(combobox1,TAB, 2, False)
résultat étant ta variable où tu auras la valeur déterminée par la fonction.
TAB doit bien sûr être une plage de feuille parfaitement définie et cette nomination risque de rentrer en conflit avec les mots réservés VBA. -
-
Bonjour,
ca ne marche pas avec moi
Il n'y a pas de raison que la fonction ne s'exécute pas correctement chez toi : si tu n'as pas le bon résultat c'est que tes paramètres ne sont pas adaptés.
Te conseiller avec le peu d'informations que tu as donné ce serait plutôt dans les compétences de madame Irma ou l'une de ses collègues de la voyance. ;--)
Si tu pouvais nous mettre un exemple de structure des données, sans éléments personnels, avec les résultats souhaités expliqués clairement, se serait plus facile de t'aider.
Pour communiquer ton classeur tu le télécharges sur https://www.cjoint.com/ (mode d'emploi) et tu mets ici le lien obtenu. -
-
