SSP34
XLDnaute Junior
Bonsoir les XLnautes,
J'ai une liste de 5000 lignes que je souhaite filtrer en tapant quelques lettres en ligne 2.
J'ai trouvé sur le forum un code fonctionnant parfaitement (merci Pierre-Jean), placé sur la feuille. Je tape quelques caractères et les ocurrences sont filtrées.
Le voici :
Private Sub Worksheet_Change(ByVal Target As Range)
'Filtre Libellé Recette
If Target.Address = "$E$2" Then
' Field est la colonne sur laquelle s'applique le filtre
Range("E2").AutoFilter Field:=5, Criteria1:="=**" & Range("E2").Value & "**"
End If
Un extrait du fichier en pièce-jointe.
Pour chaque colonne à filtrer j'ai juste changé le paramètre "Adress" et le paramètre "Field"
PROBLEME : tout fonctionne sauf pour la colonne D (code recette).
Si je tape un nombre le filtre masque toutes les lignes!
Le format est normal. Si je sélectionne plusieurs lignes Excel me renvoie bien la somme.
Je ne vois pas ce qui ne va pas.
Par avance merci pour votre aide.
Pablo.
J'ai une liste de 5000 lignes que je souhaite filtrer en tapant quelques lettres en ligne 2.
J'ai trouvé sur le forum un code fonctionnant parfaitement (merci Pierre-Jean), placé sur la feuille. Je tape quelques caractères et les ocurrences sont filtrées.
Le voici :
Private Sub Worksheet_Change(ByVal Target As Range)
'Filtre Libellé Recette
If Target.Address = "$E$2" Then
' Field est la colonne sur laquelle s'applique le filtre
Range("E2").AutoFilter Field:=5, Criteria1:="=**" & Range("E2").Value & "**"
End If
Un extrait du fichier en pièce-jointe.
Pour chaque colonne à filtrer j'ai juste changé le paramètre "Adress" et le paramètre "Field"
PROBLEME : tout fonctionne sauf pour la colonne D (code recette).
Si je tape un nombre le filtre masque toutes les lignes!
Le format est normal. Si je sélectionne plusieurs lignes Excel me renvoie bien la somme.
Je ne vois pas ce qui ne va pas.
Par avance merci pour votre aide.
Pablo.