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

VBA - Filtrer Colonnes par son nom plutôt que son emplacement

Créer une discussion
  • Initiateur de la discussion Initiateur de la discussion Piloul
  • 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
P

Piloul

Guest
Bonjour,

Je reviens à nouveau faire appel à votre génie !

Je suis sur que c'est tout bête mais je n'arrive pas à adapter le code ci-dessous afin qu'au niveau "Field" ce ne soit pas le numéro de la colonne que je veuille filtrer mais plutôt son nom "Nom"

ActiveSheet.Range("$A$1:$DZ$1" & Range("A" & Rows.Count).End(xlUp).Row).AutoFilter Field:=5, Criteria1:="Nicolas"

j'ai tenté de faire ça mais non 😛 :

ActiveSheet.Range("$A$1:$DA" & Range("A" & Rows.Count).End(xlUp).Row).AutoFilter Field:="Nom", Criteria1:="Nicolas"

Ma question est donc: comment faire pour filtrer "Nicolas" dans la colonne "Nom" suivant l'entête de la colonne et non son emplacement ? car la colonne "Nom" peut bouger suivant qui fait l'extraction... ça serait trop simple sinon 😀

Mon but final étant de supprimer les critères sélectionnés puis de repartir sur une autre colonne pour faire un autre filtre et procéder à la même opération... et ça plusieurs fois. Je passerai grâce à cela d'un tableau de 8000 lignes à 300 lignes. Un bon programme d'amaigrissement 😉

Merci par avance pour votre aide

Nico
 
Trier par date Trier par votes
Re : VBA - Filtrer Colonnes par son nom plutôt que son emplacement

Bonjour,

suivant le nom de l'entête de colonne, je ne sais pas .

Mais une solution est de définir une plage nommée (par exemple Plage_Nom) puis d'utiliser le code:

ActiveSheet.Range("$A$1:$DA" & Range("A" & Rows.Count).End(xlUp).Row).AutoFilter Field:=Range("Plage_Nom").Column, Criteria1:="Nicolas"

Si une colonne est ajoutée avant cette colonne, les références de la plage nommée sont décalées automatiquement.

A+
 
Vote positif 0 Vote négatif
Re : VBA - Filtrer Colonnes par son nom plutôt que son emplacement

Merci pour ton aide !
Je vais essayer de faire quelque chose avec ta solution 🙂

Ce qui me gêne c'est qu'il y a une grosse partie manuelle où il faut que je renomme les entêtes de colonne une à une, sachant que j'en ai une vingtaine à filtrer ça risque de prendre un peu de temps malheureusement :/

Avec VBA on doit être capable de pouvoir sélectionner une valeur précise non ? Sans repartir de ma proposition, est ce que vous auriez une solution différente ?

----------------------------------------------------
Je viens de trouver ceci qui marche parfaitement, mais avec un TCD :

With ActiveSheet.PivotTables("PivotTable9").PivotFields("Nom")
.PivotItems("Nicolas").Visible = True
End With

Mais je ne peux pas faire de TCD pour mon tableau et m'amuser à cocher les 150 colonnes de mon tableau, ça risque d'être un peu long 😛

Si cela marche avec un TCD, il doit y avoir un moyen de le faire en dehors non ?

Merci

Nico
 
Dernière modification par un modérateur:
Vote positif 0 Vote négatif
Re : VBA - Filtrer Colonnes par son nom plutôt que son emplacement

re,

c'est parce qu'une cellule fait partie d'une 'structure' qu'on peut la retrouver comme vous précisez
soit dans un TCD
soit dans un tableau (au sens excel 2007)

un lien pour la gestion des tableaux Les tableaux dans Excel 2007
un pour la partie VBA Ce lien n'existe plus

Sinon une autre solution pourrait consister à utiliser find sur la ligne d'entête de colonne pour trouver la cellule contenant "noms" .

Il existe peut-être d'autres solutions ?

Bonne suite
 
Vote positif 0 Vote négatif
Re : VBA - Filtrer Colonnes par son nom plutôt que son emplacement

Bonsour®
nommer automatiquement les colonnes selon le nom de l'entete :
sélectionner les colonnes souhaitées...
Ctrl+Maj+F3
exemple :
 

Pièces jointes

  • Capture.JPG
    83.3 KB · Affichages: 244
  • Capture.JPG
    83.3 KB · Affichages: 212
Dernière édition:
Vote positif 0 Vote négatif
Re : VBA - Filtrer Colonnes par son nom plutôt que son emplacement

Merci beaucoup à vous deux ! je vais tester tout ce que vous me dites.
La piste "find" va être mon premier test !

Si je trouve la solution qui fera mon bonheur je vous tiens au courant 🙂

Bonne journée
 
Vote positif 0 Vote négatif
Re : VBA - Filtrer Colonnes par son nom plutôt que son emplacement

J'ai la solution !

Alors ce que j'ai fait grâce aux différentes pistes que vous m'avez donné :
- J'ai converti mon tableau en table (pour que ça fasse parti d'une structure comme le TCD --> merci PAF pour la piste)
- Et grace au lien Ce lien n'existe plus j'ai pu adapter ce que je voulais.

Ce qui donne donc :

Sub Filtre ()

'Filtre "Nicolas" sur la colonne "Nom" qui se trouve dans la "Table1"
ActiveSheet.ListObjects("Table1").Range.AutoFilter Field:=Range("Nom").Column - 1, Criteria1:= _
"Nicolas", Operator:=xlAnd
'Supprime le résultat
Range("A2:A" & Range("A" & Rows.Count).End(xlDown).Row).SpecialCells(xlCellTypeVisible).EntireRow.Delete
'Enlève le filtre existant
Rows("1:1").Select
ActiveSheet.ShowAllData

End Sub

En espèrant que ça pourra servir à d'autres 🙂

Bonne journée à tous.

Nicolas
 
Dernière modification par un modérateur:
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
300
Hecatonchire
H
T
  • Résolu(e)
XL 2019 Filtrer certains champs au démarrage avec vba
2
Réponses
15
Affichages
1 K
telemarrk
T
L
  • Résolu(e)
Microsoft 365 Trie par Date & Heure
Réponses
8
Affichages
612
Le Rouky
L
P
  • Résolu(e)
XL 2016 4 étapes en 1 seule Excel vba
Réponses
4
Affichages
897
Pygos691
P
W
  • Question Question
XL 2021 Boucle copier-coller par nom d'en-tête de colonnes
Réponses
10
Affichages
852
whiteshark
W
T
  • Résolu(e)
XL 2019 Filtrer un colonne de donnée suivant une autre colonne
Réponses
5
Affichages
1 K
sylvanu
A
  • Question Question
Microsoft 365 Macro : Somme automatisée sur plusieurs feuilles.
Réponses
2
Affichages
975
AntoineLTO
A
  • Question Question
XL 2016 Excel VBA : syntaxe insertion de variable dans un filtre avancé
Réponses
5
Affichages
1 K
xUpsilon
E
  • Résolu(e)
XL 2016 filtrer sous condition colonne date trimestriellement en vba
Réponses
7
Affichages
844
Compte Supprimé 979
C
C
  • Question Question
XL 2019 Filtrage de données en VBA
Réponses
11
Affichages
2 K
Phil69970
A
  • Résolu(e)
XL 2016 Filtre sur Dates ne fonctionne pas Excel VBA
Réponses
2
Affichages
2 K
Aldonanou
A
  • Question Question
Microsoft 365 Recherche Find : impossible dans lignes masquées par le filtre
2 3
Réponses
38
Affichages
4 K
Usine à gaz
V
  • Résolu(e)
Microsoft 365 Afficher filtres appliqués par macro dans la cellule B3 directement et non par F5 puis Réinitialiser
Réponses
12
Affichages
2 K
VirginieG
V
A
  • Résolu(e)
XL 2016 Macro consolidation plusieurs fichiers en 1 seul
Réponses
8
Affichages
2 K
Alan28
A
  • Résolu(e)
XL 2019 Filtre dynamique (VBA) sur des colonnes avec le format número or date
Réponses
6
Affichages
2 K
CJA33
C
R
  • Résolu(e)
XL 2016 Lister fichiers avec Exifs et propriétés (suivant son choix) - code à modifier
10 11 12
Réponses
167
Affichages
18 K
re4
R
T
  • Question Question
XL 2016 [VBA] problème macro EXCEL ne réponds pas
Réponses
11
Affichages
2 K
terry08200
T
J
  • Question Question
XL 2013 Filtrer une listbox avec une combobox
Réponses
3
Affichages
5 K
job75
O
  • Question Question
XL 2019 Excel VBA - Condition selon le nom du fichier
Réponses
5
Affichages
2 K
Staple1600
A
  • Question Question
Filtre par VBA et feuille protégée
Réponses
8
Affichages
3 K
Staple1600
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…