Bonjour, je recherche une methode propre de test pour savoir si la valeur d'un range appartient a un tableau de valeur par exemple ou eventuellement a un autre range , mais prioritairement a un tableau .

j'ai codé un truc un peu salement , ca fonctionne mais j'aimerais un truc plus propre sans gestion d'erreur qui je sais est a eviter

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
    Dim MyTab As Variant
    Dim MyRange As Range
    MyTab = Array("SEK", "EUR")
    With Application.ThisWorkbook.Worksheets("Feuil2")
        For Each MyRange In .UsedRange.Columns(2).Cells
            On Error Resume Next
            If Not IsNull(Application.WorksheetFunction.Match(MyRange.Value, MyTab, 0)) Then
                If Err.Number = 1004 Then GoTo 1
                MsgBox ("Il y est")' on fait une action peu importe 
            End If
1        Next MyRange
    End With
End Sub
en gros je parcours une colonne , je test si la valeur appartien a mon tableau ou non .