[AC-2007] Fonction "fait partie de" ? [Résolu]

[stargates01]

Bonsoir à tous,

en Vba, savez vous comment écrire une condition du type : "si x est dans la liste (papa, maman, frère) alors...". Je ne me souviens plus de la fonction ou du comparateur à utiliser après if.

Merci à ceux qui pourront me renseigner.

Stargates

[Philippe JOCHMANS]

Bonjour

Regardes du cote de InStr, si la fonction retourne une position, c'est que c'est à l'intérieur.

Philippe

[stargates01]

Merci mais en fait je comprends que Instr(start,str1,str2) permet de rechercher la position de la chaine str1 dans la chaine str2, à partir de la position start. Ce que je cherche c'est pouvoir tester si une chaine str1 se trouve ou non parmi un ensemble fini de chaines str2, str3, str4,str5,etc.. et la je vois pas comment Instr() pourrait fonctionner.

[Philippe JOCHMANS]

Re

Envoyé par Philippe JOCHMANS

si la fonction retourne une position, c'est que c'est à l'intérieur.

[Thierry_PALLIER]

Bonjour stargates01 et Philippe JOCHMANS

en vba :

Code :

1
2
3
4
5
6
7
8
9
10
11
12
Sub essais()
 
Dim MonResultat As Long
Dim MonResultat2 As Long
 
MonResultat = InStr(1, "fils,père,mère", "père", vbTextCompare)
MonResultat2 = InStr(1, "fils,père,mère", "papa", vbTextCompare)
 
If MonResultat > 0 Then
ta condition
End If
End Sub

MonResultat = 6 ,puisque la chaine "père" est trouvée à partir du 6° caractère.
MonResultat2 = 0 ,puisque la chaine "papa" n'est pas trouvée
N'hesite pas a utiliser la touche "F1" pour trouver des exemples .
Cdlt

[stargates01]

OK, capito ! merci de ces explications détaillées et boone journée.

Stargates