Pb autofilter vba

ptikiki -  
 ptikiki -
Bonjour,
bonjour je vous explique g deux feuilles la premier est un num compte au format texte comme dessous
2011
2021
2031
2031
2041
2061
2051
205200

g une 2eme feuille
201119 201 2011 20111
201119 201 2011 20111
201119 201 2011 20111
201119 201 2011 20111
201119 201 2011 20111
201119 201 2011 20111
201119 201 2011 20111
201119 201 2011 20111
201119 201 2011 20111
201119 201 2011 20111
201119 201 2011 20111
201119 201 2011 20111
201119 201 2011 20111
201119 201 2011 20111
les 3 derniere colonne sont des gauche de la premiere colonne
je veux filtrer la feuille grace au num de la premiere donc g codé ainsi :
'sélection du numéro de compte
If Len(num_compte) = 2 Then
Selection.AutoFilter Field:=1, Criteria1:=num_compte
ElseIf Len(num_compte) = 3 Then
Selection.AutoFilter Field:=2, Criteria1:=num_compte
ElseIf Len(num_compte) = 4 Then
Selection.AutoFilter Field:=3, Criteria1:=num_compte
ElseIf Len(num_compte) = 5 Then
Selection.AutoFilter Field:=4, Criteria1:=num_compte
ElseIf Len(num_compte) = 6 Then
Selection.AutoFilter Field:=1, Criteria1:=num_compte
End If
la longueur des numéro de compte est bonne
mais lorsque j'ai un champ différent du champ 1ça ne marche plus peut il y avoir un probleme de format?
merci

1 réponse

ptikiki
 
personne?
0