Prob macro filtre si cellule filtrante vide
Bonjour à tous,
J'ai fais une macro permettant de filtrer des colonnes et fonction de plusieurs critères indiqués dans plusieurs celulles.
Le problème est que si l'une des cellules critère du filtre est vide la macro ne fonctionne pas
J'ai essayé de mettre plusieurs fois la même valeur pour les cellules critère, ça ne fonctionne pas non plus...
Voilà la macro:
Sub Macro3()
'Filtre des journaux du Grand livre en fonction de la Feuille "Paramètre"
Sheets("Grand livre retraité").Select
Selection.AutoFilter
ActiveSheet.Range("$A$1:$E$100000").AutoFilter Field:=2, _
Criteria1:=Range("'Paramètrage'!B6").Value, Operator:=xlOr, _
Criteria2:=Range("'Paramètrage'!C6").Value, Operator:=xlOr, _
Criteria3:=Range("'Paramètrage'!D6").Value, Operator:=xlOr, _
Criteria4:=Range("'Paramètrage'!E6").Value
ActiveSheet.Range("$A$1:$E$100000").AutoFilter Field:=5, _
Criteria1:=Range("'Paramètrage'!B7").Value, Operator:=xlOr, _
Criteria2:=Range("'Paramètrage'!C7").Value, Operator:=xlOr, _
Criteria3:=Range("'Paramètrage'!D7").Value, Operator:=xlOr, _
Criteria4:=Range("'Paramètrage'!E7").Value, Operator:=xlOr, _
Criteria5:=Range("'Paramètrage'!F7").Value, Operator:=xlOr, _
Criteria6:=Range("'Paramètrage'!G7").Value, Operator:=xlOr, _
Criteria7:=Range("'Paramètrage'!H7").Value
Salut,
Merci à toi!
Ca fonctionne presque parfaitement,
En fait, je filtre la colonne E par des chiffres.
Le seul truc c'est que pour que cela fonctionne il faut que je mette les chiffres dans l'onglet Paramètre en texte avec " ' " devant le chiffre
Mais ce n'est pas vraiment génant,
Merci bcp