Filtre élaboré 3 critères

dominique3829

XLDnaute Junior
J'ai lu une de vos solutions pour les filtres élaborés
J'aurais une question à vous poser, comment faire en vba pour filtrer avec au moins 3 conditions?
je ne trouve rien dans les messages !

Merci pour votre aide

dominique
 

JCGL

XLDnaute Barbatruc
Re : Filtre élaboré 3 critères

Bonjour à tous,

A mon avis ce code ne peut pas fonctionner.
Peux-tu essayer avec :

Code:
Option Explicit

Sub Filtre()
    Columns("A:F").AutoFilter
    Selection.AutoFilter Field:=5, Criteria1:="[COLOR=Blue][B]<>*3?5*[/B][/COLOR]"
    Range("E1").Select
End Sub
Où <>*3?5* correspond à différent de 305 à 395 (le ? impliquant un caractère et un seul donc une lettre ou un chiffre)

A+ à tous
 
Dernière édition:

JCGL

XLDnaute Barbatruc
Re : Filtre élaboré 3 critères

Bonjour à tous,

En filtre automatique :

Code:
Option Explicit

Sub Filtre()
    Columns("A:F").AutoFilter
    Selection.AutoFilter Field:=5, Criteria1:="<>*3?5*"[COLOR=Blue][B], Operator:=xlOr, Criteria1:="<>*TER*"[/B][/COLOR]
    Range("E1").Select
End Sub

A+ à tous
 

Discussions similaires

Réponses
40
Affichages
1 K
Réponses
31
Affichages
673
  • Résolu(e)
Microsoft 365 Filtre élaboré
Réponses
3
Affichages
238
Réponses
69
Affichages
4 K

Statistiques des forums

Discussions
312 509
Messages
2 089 145
Membres
104 050
dernier inscrit
Pepito93100