Tester une variable dans une liste de valeur

Bonjour a tous.

Je possède une variable et je voudrais tester sa valeur parmis une liste.
je pourrais certe faire le code suivant :
Code:

1 2 if (var="valeur1" or var="valeur2" or var="valeur3") then ...
Mais j'ai une vingtaine de valeur possible et j'ai un peut la flemme de tous tapper, sans compter que ca va donner un code plutot massif.
J'ai bien pensé à créer une liste de mes valeurs possible et a tester ma variable dans une boucle, mais je voudrais savoir s'il n'existe pas une synthaxe plus courte qui m'évite de créer une liste, un truc du genre :
Code:

1 2 if var EST_INCLU_DANS "var1,var2,var3" then ...
Voila, j'espère que ma demande est suffisament claire. Merci d'avance

Bonsoir,

peut-être comme ça :

Code:

1
2
3
4
Dim strValeurs As String
strValeurs="|valeur1|valeur2|....|Valeur19|Valeur20|"
 
If Instr(1, strValeurs, "|" & var & "|")>0 Then ...

A+

Effectivement, je viens de tester et ca fonctionne à merveillle.
Merci beaucoup
@+