Problème condition de comparaison en vba
ranma12
-
Mayo_55 Messages postés 13 Date d'inscription Statut Membre Dernière intervention -
Mayo_55 Messages postés 13 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
J'ai un soucis avec mon code en vba sous access. En effet, je veux voir si une valeur (Form_Emplacement.ref_support) tapée est déja présente dans une liste déroulante(Form_Emplacement.Modifiable70).
Lorsque j'affiche ma valeur1 et ma valeur2 et que celles ci sont égales, la condition me retourne tout le temps faux.
Je fais donc appel à vous pour avoir un peu d'aide.
Le code est ci-dessous. Merci d'avance !
Dim i As Integer
Dim boucle66 As Boolean
i = 0
Do While i < Form_Emplacement.Modifiable70.ListCount And boucle66 <> True
valeur1 = Form_Emplacement.Modifiable70.Column(1, i)
MsgBox valeur1
valeur2 = Form_Emplacement.ref_support
MsgBox valeur2
If (valeur1 <> valeur2) Then
boucle66 = False
Else
boucle66 = True
End If
i = i + 1
MsgBox boucle66
Loop
J'ai un soucis avec mon code en vba sous access. En effet, je veux voir si une valeur (Form_Emplacement.ref_support) tapée est déja présente dans une liste déroulante(Form_Emplacement.Modifiable70).
Lorsque j'affiche ma valeur1 et ma valeur2 et que celles ci sont égales, la condition me retourne tout le temps faux.
Je fais donc appel à vous pour avoir un peu d'aide.
Le code est ci-dessous. Merci d'avance !
Dim i As Integer
Dim boucle66 As Boolean
i = 0
Do While i < Form_Emplacement.Modifiable70.ListCount And boucle66 <> True
valeur1 = Form_Emplacement.Modifiable70.Column(1, i)
MsgBox valeur1
valeur2 = Form_Emplacement.ref_support
MsgBox valeur2
If (valeur1 <> valeur2) Then
boucle66 = False
Else
boucle66 = True
End If
i = i + 1
MsgBox boucle66
Loop
A voir également:
- Problème condition de comparaison en vba
- Excel cellule couleur si condition texte - Guide
- Comparaison million milliard - Accueil - Technologies
- Logiciel comparaison photo gratuit - Télécharger - Photo & Graphisme
- Excel compter cellule couleur sans vba - Guide
- Excel condition ou - Guide