Bonjour,
Je bute sur un problème, je souhaite effectuer une action en fonction de l'appartenance de la valeur d'une cellule à une liste de référence variable.
L'exemple que j'ai trouvé fonctionne si je mets en dur la liste des valeurs à tester mais me renvoie une valeur 2015 dans la réponse au lieu de vrai/faux lorsque j'essaie de passer par une variable.
En fait je pense que je ne défini pas bien ma variable "Liste" ou que je ne l'appelle pas correctement.
Quelqu'un aurait-il une idée ?
Merci
Denis
Mon exemple
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18 Sub fil_grp1() 'Renseigner les machines à garder Groupe 1 142;144;161;162;282 Liste = "142;144;161;162;282" For i = [b65536].End(xlUp).Row To 1 Step -1 ' là ça marche rep = Evaluate("=NOT(ISNA(MATCH(" & Cells(i, 2) & ",{142;144;161;162;282},0)))") 'là ça marche pas du tout rep prend la valeur 2015 ???? ' rep = Evaluate("=NOT(ISNA(MATCH(" & Cells(i, 2) & ",{ (Liste) },0)))") If rep = False Then Rows(i).EntireRow.Delete End If Next End Sub
Partager