Chères amies, chers amis du forum

Je suis sur un probleme qui me gache la vie depuis un paquet de mois. Ce code me permet d'afficher le resultat issu d'un autofilter:

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
 
 
With Sheets("BDD")
 
    .Select
    For j = 2 To intNcol
        vntTmpVector = Application.Index(Application.Transpose(gvVNTArrayQueryData), j)
        strTmpName = CStr(vntTmpVector(1))
        vntTmpVector(1) = Empty
 
        .Range(.Cells(4, 1), .Cells(4, 1).End(xlToRight)).AutoFilter Field:=20, Criteria1:=Array(vntTmpVector), Operator:=xlFilterValues
 
        If .FilterMode = True Then .ShowAllData
 
    Next j
    'If .FilterMode = True Then .ShowAllData
End With
ou vntTmpVector est un vecteur extrait d'un tableau/matrice composé de string.

Cepandant je souhaite afficher le complémentaire de cette selection, j'avais pensé à ajouter "<> " devant tout les élément du vecteur mais sa marche pas.

Auriez vous une idée SVP?

Merci