Bonjour,
Je voudrais filtrer un champ de type texte en récupérant la chaine de caractère depuis un userform. Le pb c'est qu'en filtrant je n'ai plus de données, aucune valeur na été filtrée.... je ne comprends pas pourquoi...
Voici le code (adaptée d'une macro!!) pour filtrer:
avec Filtre le nom du UserForm
zl_rapport la zone de liste où on récupère la chaine de caractère.
Voici la macro sur laquelle je me suis appuyée pour le code au dessus:
Cette macro marche alors que celle précédente nan... je ne vois absolument pas pk...
J'ai essayer en vain d'autre méthode:
Merci de m'aider
Je voudrais filtrer un champ de type texte en récupérant la chaine de caractère depuis un userform. Le pb c'est qu'en filtrant je n'ai plus de données, aucune valeur na été filtrée.... je ne comprends pas pourquoi...
Voici le code (adaptée d'une macro!!) pour filtrer:
Code:
'Rapport
If Filtre.zl_rapport <> "" Then
ActiveSheet.Range("$A$1:$" & lettre & I).AutoFilter Field:=7, Criteria1:=zl_rapport, Operator:=xlAnd
Else
ActiveSheet.Range("$A$1:$" & lettre & I).AutoFilter Field:=7 'Annule filtre si il y en avait un
End If
avec Filtre le nom du UserForm
zl_rapport la zone de liste où on récupère la chaine de caractère.
Voici la macro sur laquelle je me suis appuyée pour le code au dessus:
Code:
ActiveSheet.Range("$A$1:$AM$6153").AutoFilter Field:=7, Criteria1:= _
"=Z:\REPORTS\1403040a.LR", Operator:=xlAnd
Cette macro marche alors que celle précédente nan... je ne vois absolument pas pk...
J'ai essayer en vain d'autre méthode:
Code:
ActiveSheet.Range("$A$1:$" & lettre & I).AutoFilter Field:=7, Criteria1:=Array(zl_rapport), Operator:=xlFilterValues
Merci de m'aider
Dernière édition: