Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Filtrer des données sous excel en VBA

Créer une discussion
  • Initiateur de la discussion Initiateur de la discussion kennedy
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S'inscrire
K

kennedy

Guest
Bonjour à toutes et à tous 🙂.

Je souhaiterais filtrer un certain nombre de données dans la colonne F d'un fichier excel en vba donc.

voilà ce que j'ai commencé à faire:

Code: 
With Selection
        .AutoFilter 'on active le filtre automatique
        .AutoFilter Field:=1, Criteria1:="abc"  
End With

Comment faire pour trier via vba plus d'une certaine donnée à la fois? (histoire d'avoir en un seul filtre, toutes les infos dont j'ai besoin d'un coup)
J'ai essayer le code qui suit: mais ça ne marche pas 🙁

Code: 
With Selection
        .AutoFilter 'on active le filtre automatique
        .AutoFilter Field:=1, Criteria1:="abc" & Criteria1:="efg"  
End With

Merci d'avance 🙂 Bonne journée!!
 
Trier par date Trier par votes
Re : Filtrer des données sous excel en VBA

Salut kennedy et le forum

Code: 
With Selection
        .AutoFiltermode =false 'on désactive le filtre automatique
        .AutoFilter Field:=1, Criteria1:="abc"  
End With
Déjà, utiliser selection dans une macro est une microsofterie 😀 : ça sert à rien.
Si tu essaies d'utiliser le filtre automatique, c'est que tu as réussi à faire manuellement la manipulation que tu essaies de faire par VBA ? Non ?

Petite question : En nous donnant un code manifestement faux, qu'est-ce qui te permet de croire qu'on va découvrir ce que tu envisages de faire ? Même la télépathie à besoin d'un minimum !
A+
 
Vote positif 0 Vote négatif
Re : Filtrer des données sous excel en VBA

Bonjour 🙂 disons que la première partie de code marche très bien 😉...
c'est le fait de vouloir filtrer plusieurs données à la fois qui ne marche pas.
Et non je n'arrifve pas a faire manuellement une filtration de plus de 2 données... je voudrais en filtrer plus.

Avant de dire qu'il est manifestement faux? essaie le non? 😉
voila ce que je fais pour le moment si tu veux avoir un ordre d'idée...

Code: 
Worksheets("étape").Activate
Columns("F").Select
[B]With Selection
        .AutoFilter 'on active le filtre automatique
        .AutoFilter Field:=1, Criteria1:="% CLIENTS"
End With[/B]
Range("A:N").Copy
Worksheets("end").Activate
Sheets.Add
ActiveSheet.Name = "i" & i
i = i + 1
Range("A1").PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False
Range("J2:J65536").Clear
Columns("I").Delete Shift:=xlToLeft
        
        
Worksheets("étape").Activate
Columns("F").Select
[B]With Selection
        .AutoFilter 'on active le filtre automatique
        .AutoFilter Field:=1, Criteria1:="MARGE" 
End With[/B]
Range("A:N").Copy
Worksheets("end").Activate
Sheets.Add
ActiveSheet.Name = "i" & i
i = i + 1
Range("A1").PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False
Range("J2:J65536").Clear
Columns("I").Delete Shift:=xlToLeft

je réitère x fois cette opération... pour x utilisation du filtre dans la même colonne. Le but de ma question est de rassembler en un coup toutes les informations que je souhaite en un seul filtre et le coller dans ce cas dans une feuille unique. Pour le moment je suis obligé de passer par plusieurs feuilles et plusieurs filtres pour arriver à mes fins.
 
Vote positif 0 Vote négatif
Re : Filtrer des données sous excel en VBA

Salut kennedy et le forum
Un filtrage simple avec un seul ET ou un seul OU (par colonne)
Un filtrage avec plusieurs Et et/ou OU => filtre élaboré
Menu Données>>filtrer>>Filtre élaboré
Il te faut une zone de critére comportant les mêmes titres que ta zone de données : une ligne fait des ET entre colonnes
Les OU se font de ligne à ligne.

Tant que tu n'arriveras pas à le faire manuellement, difficile d'imaginer comment le faire par programmation !
Code: 
With Selection
        .AutoFilter '[COLOR=Red]on active le filtre automatique[/COLOR]
        .AutoFilter Field:=1, Criteria1:="% CLIENTS"
End With
C'est faux : S'il n'y a aucun filtre, ".autofilter" active le filtre auto. Mais s'il y a déjà un filtre auto sur la sélection, il désactive le filtre auto ! Pour t'en convaincre, teste un code du style
Code: 
Sub test()
With Selection
        .AutoFilter 'on active le filtre automatique
        .AutoFilter 'on active le filtre automatique
        .AutoFilter 'on active le filtre automatique
        .AutoFilter 'on active le filtre automatique
        .AutoFilter 'on active le filtre automatique
End With
End Sub
En Pas-à-Pas, en regardant ta sélection.


Ta macro donnerait un code dans ce style
Code: 
Worksheets("étape").Activate
Columns("F").AutoFilter Field:=1, Criteria1:="% CLIENTS"
Range("A:N").Copy
Sheets.Add
ActiveSheet.Name = "i" & i
i = i + 1
Range("A1").PasteSpecial Paste:=xlPasteValues
Range("J2:J65536").Clear
Columns("I").Delete
        
Worksheets("étape").Activate
Columns("F").AutoFilter Field:=1, Criteria1:="MARGE"
Range("A:N").Copy
Sheets.Add
ActiveSheet.Name = "i" & i
i = i + 1
Range("A1").PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False
Range("J2:J65536").Clear
Columns("I").Delete
Et encore, ne possédant qu'un lambeau de code, je ne peux boucler alors que 8 lignes de code sur 9 sont identiques, et que pour la neuvième, un texte, le critère, est différent : avec un select case et une variable, ce serait fait facilement.
A+
 
Dernière édition:
Vote positif 0 Vote négatif
Re : Filtrer des données sous excel en VBA

Bonsoir à tous

Une précision sur le filtre élaboré
Il te faut une zone de critére comportant les mêmes titres que ta zone de données : une ligne fait des ET entre colonnes
Cliquez pour agrandir...
Pas toujours vrai on peut utiliser une formule comme critère et là l'entête doit être vide (cf ci dessous)
 
Dernière édition:
Vote positif 0 Vote négatif
Re : Filtrer des données sous excel en VBA

Re

Gorfael
Voir mon précédent message, je l'ai édité et y ai ajouté un exemple.

Ici la zone de critère du filtre élaboré sera : $B$1:$B$2 et B1 doit être vide.
 
Dernière édition:
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

N
  • Question Question
Microsoft 365 TEXTBOX pour filtrer un TCD
Réponses
6
Affichages
379
Hecatonchire
H
  • Question Question
XL 2016 Filtrer plage via le contrôle ActiveX : combobox
Réponses
7
Affichages
525
KTM
G
  • Question Question
XL 2016 filtrer, copier et coller les données avec la macro
Réponses
4
Affichages
308
job75
T
  • Résolu(e)
XL 2019 Filtrer certains champs au démarrage avec vba
2
Réponses
15
Affichages
1 K
telemarrk
T
A
  • Question Question
XL 2010 Filtrer un Combobox en VBA excel
2 3
Réponses
43
Affichages
3 K
Dranreb
A
  • Question Question
Microsoft 365 VBA et "Slicer" dans un TCD (source modèle de données)
Réponses
2
Affichages
242
Amilo
A
  • Question Question
Microsoft 365 Excel VBA: manipuler des fichiers partagés via Teams / Sharepoint
Réponses
2
Affichages
105
Eric 888
P
  • Question Question
Microsoft 365 VBA et Segments TCD
Réponses
2
Affichages
524
patricko-13
P
G
  • Résolu(e)
XL 2016 Pb de tri et sous totaux
2
Réponses
27
Affichages
2 K
Gestionnaire_rh
G
EXCEL :: VBA :: Activer - Désactiver les filtres dans un tableau en plage d'adresses ou dans un tableau structuré
Réponses
0
Affichages
618
oguruma
  • Résolu(e)
XL 2021 Sélectionner la 1ère cellule après filtrage
Réponses
2
Affichages
622
Usine à gaz
  • Résolu(e)
XL 2021 Filtrage que je ne parviens pas à faire
Réponses
6
Affichages
787
Usine à gaz
  • Question Question
XL 2021 pour information : Filtrer sur date
Réponses
1
Affichages
502
TooFatBoy
S
  • Résolu(e)
XL 2016 Besoin d'aide pour un code d'extraction
Réponses
14
Affichages
1 K
Phil69970
  • Résolu(e)
Microsoft 365 VBA: Filtrer sur les données vide
Réponses
11
Affichages
2 K
VBA_dev_Anne_Marie
D
  • Question Question
Microsoft 365 VBA filtre plusieurs colonne a partir d'une donnée (sous combobox)
Réponses
7
Affichages
1 K
Dranreb
S
  • Question Question
Microsoft 365 Tableaux Structurées : récupérer des données uniques pour consolider un bilan
Réponses
4
Affichages
417
vgendron
T
  • Résolu(e)
Microsoft 365 VBA Exporter une sélection de plages nommées au format PDF
Réponses
12
Affichages
1 K
tnion
T
X
  • Question Question
XL 2016 Souci copier/coller avec un filtre.
2 3 4
Réponses
55
Affichages
5 K
Xender
X
N
  • Question Question
Microsoft 365 appel des sous-routine
Réponses
3
Affichages
428
Dranreb
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…