Bonjour à tous,

J'aimerais filtré les données en colonne A, dans la colonne E et cela selon la formule :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
=GAUCHE($A2;4)="T100"
en C1:C2
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Column = 1 And Target.Count = 1 Then
        [A1:A5000].AdvancedFilter Action:=xlFilterCopy, Criteriarange:=[C1:C2], CopyToRange:=[E1], Unique:=True
 
        [E16:E100].Sort Key1:=[E2]
    End If
End Sub
Mais je n'arrive toujours pas

Merci d'avance.