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

Autres Filtre sur colonnes multiples

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

Michel1942

XLDnaute Nouveau
Bonjour à tous,



J’ai le problème suivant en VBA sous excel 2003.


Je voudrais filtre sur place un tableau sur deux colonnes non contigües si les cellules sont vides dans les deux colonnes simultanément.
Les colonnes ne sont pas fixes et doivent être sélectionnées avant de lancer la macro.
Le bouton de lancement existe déjà dans ma barre d’outils.
Je joint un exemple de fichier où filtrer les colonnes B et E mais pas forcément.

Je sais faire le filtre sur une colonne.

Merci d’avance pour vos propositions.
 

Pièces jointes

Trier par date Trier par votes
Désolé de ne pas répondre à tous les post mais j'ai attrapé le Covid avec la totale et je suis en mode veille. Enore merci à tous pour vos réponses,
 
Vote positif 0 Vote négatif
Et donc toujours pas de retour sur ma macro de #17, qu'on retrouve dans la pièce jointe de #24 pour te faciliter son test ?!?

Ni sur #22 qui répond pourtant exactement à ta question de #12 en te montrant une façon de récupérer les numéros des colonnes sélectionnées ?
 
Dernière édition:
Vote positif 0 Vote négatif
Bonsoir Michel, Marcel,

je te retourne le fichier de ton post #35 modifié ; utilisation identique ➯ fais comme d'habitude : fais Ctrl f puis ensuite, sélectionne avec la souris tes 2 colonnes. 🙂 bien sûr, tu pourras aussi toujours faire Ctrl d pour démasquer tes lignes masquées. 😉​


code VBA de Module3 (28 lignes) :

VB: 
Option Explicit

Sub Filtre_2_colonnes()

  Dim ref As Range, chn$, ColAct1%, ColAct2%, DerLigne&, i& 'Déclaration des variables
 
  'Sélectionner les 2 colonnes avec la souris
  Set ref = Application.InputBox(prompt:="Choisir les 2 colonnes avec la souris", Type:=8)
  chn = ref.Address(0, 0) 'avec (0,0) : adresse plus simple car sans les $ ; ex : B:B,E:E
 
  If Len(chn) = 7 Then 'Vérifier si le nombre de caractères de la saisie est correct
    
    'Extraire les numéros des 2 colonnes
    ColAct1 = Columns(Split(chn, ",")(0)).Column
    ColAct2 = Columns(Split(chn, ",")(1)).Column
    
    DerLigne = Cells(Rows.Count, 1).End(xlUp).Row: Application.ScreenUpdating = 0
    
    'Garder les deux lignes d'entête
    For i = 3 To DerLigne
      'Si cellules vides dans les 2 colonnes choisies, masquer la ligne
      If IsEmpty(Cells(i, ColAct1)) And IsEmpty(Cells(i, ColAct2)) Then Rows(i).Hidden = True
    Next i
  End If
  Application.Goto [A1], True 'Retour au début

End Sub

code VBA de Module1 (8 lignes) :

VB: 
Option Explicit

Sub Démasquer()
  Dim DerLigne&
  DerLigne = Cells(Rows.Count, 1).End(xlUp).Row
  Rows("1:" & DerLigne).Hidden = 0: [A1].Select
End Sub

soan
 

Pièces jointes

Vote positif 0 Vote négatif
Plus de 72 heures après l'envoie de sa macro en première ligne sur le front du forum, Marcel32 est toujours sans nouvelles d'elle !
Fonctionne-t-elle ?
Est-elle HS ?

Peut-être des nouvelles à venir dans les prochaines heures ???
Tout espoir n'est pas encore perdu.

En attendant, prions le dieu du café expresso.
​
 
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

Discussions similaires

P
  • Question Question
XL 2016 VBA Appliquer un filtre sur mes données importées
Réponses
4
Affichages
367
sousou
C
  • Question Question
XL 2021 Liste déroulante sur plusieurs colonnes
Réponses
3
Affichages
235
Jean-Eric
P
  • Question Question
XL 2019 Macro VBA appliquer un filtre lors d'une importation de données
Réponses
1
Affichages
217
fanch55
B
  • Question Question
XL 2013 Transposition de filtres multiples sur plusieurs feuilles
Réponses
11
Affichages
752
BIROULIG
B
C
  • Question Question
XL 2016 Excel Macro permettant de masquer une ligne lorsque les cellules de 2 colonnes contigües sont vides
Réponses
11
Affichages
449
chris63
C
R
  • Question Question
XL 2021 Filtres améliorés sur Excel
Réponses
7
Affichages
603
Cousinhub
L
  • Résolu(e)
Microsoft 365 Filtrer une ListView sur un intervalle de valeurs avec ComboBox
Réponses
4
Affichages
717
Lyrix
L
B
  • Question Question
XL 2016 VBA formulaire incrémenter un N° de facture selon l'année(mais dates sur deux colonnes)
Réponses
4
Affichages
676
badduke
B
X
  • Question Question
XL 2016 Souci copier/coller avec un filtre.
2 3 4
Réponses
55
Affichages
4 K
Xender
X
T
  • Résolu(e)
Microsoft 365 VBA code filtre auto en boucle - plusieurs critères
2
Réponses
28
Affichages
2 K
tnion
T
POWERQUERY :: Importer un fichier .csv avec construction de critères dynamiques (5 max) de type texte et sélection entre deux dates possible - V2.0
Réponses
0
Affichages
576
oguruma
Office XLS : Fonction simplifiant l'utilisation de la fenêtre FileDialog
Réponses
6
Affichages
356
Lu76Fer
L
  • Question Question
XL 2016 Comment faire une liste sans doublons de plusieurs colonnes avec des contenus doublonnés sur différentes lignes SANS TCD
Réponses
10
Affichages
1 K
chris
A
  • Question Question
XL 2019 Faire un filtre sur deux dates
Réponses
0
Affichages
698
A-F
A
T
  • Question Question
Microsoft 365 [Résolu] Copier des colonnes à la fin d'un tableau
Réponses
2
Affichages
1 K
Tava94
T
B
  • Question Question
XL 2019 Filtre élaboré sur des données alphanumériques
Réponses
1
Affichages
901
Staple1600
D
  • Question Question
XL 2016 Tableau dynamique croisé sur une feuille de données avec un filtre sur l'une des colonnes
Réponses
0
Affichages
840
DomZ
D
M
  • Résolu(e)
Microsoft 365 Formule si avec conditions multiples dans colonnes discontinues
Réponses
9
Affichages
1 K
job75
POWERQUERY :: Lancement de requêtes à tiroir - dynamiques - paramétrables - code des requêtes sur disque - Exemple de mise en oeuvre
Réponses
0
Affichages
618
oguruma
B
  • Question Question
XL 2013 remplissage automatique des colonnes
Réponses
3
Affichages
646
nat54
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…