AutoFilter [Résolu]

Signaler
Messages postés
128
Date d'inscription
samedi 17 août 2013
Statut
Membre
Dernière intervention
25 mai 2021
-
Messages postés
128
Date d'inscription
samedi 17 août 2013
Statut
Membre
Dernière intervention
25 mai 2021
-
Bonjour,

je cherche à remplacer dans la ligne ci-dessous Test par le contenu dans TextBox
ActiveSheet.Range("$C$9:$X$27").AutoFilter Field:=10, Criteria1:="*Test*", Operator:=xlAnd

Dans les cellules ou il doit faire le tri, il y a plusieurs ligne avec plusieurs nom.
ActiveSheet.Range("$C$9:$X$27").AutoFilter Field:=10, Criteria1:=TextBox, Operator:=xlAnd

il ne trouve pas les cellules qui contienne le texte Test dans les cellules.

Merci de votre aide.

Lionel

1 réponse

Messages postés
128
Date d'inscription
samedi 17 août 2013
Statut
Membre
Dernière intervention
25 mai 2021
2
il faut mettre TextBox comme suit

"*" & TextBoxDetenu & "*"

ActiveSheet.Range("$C$9:$X$27").AutoFilter Field:=10, Criteria1:="*" & TextBoxDetenu & "*", Operator:=xlAnd