Bonjour,
J'ai du faire un travail de filtrage sur les heures d'une colonne contenant des dates et heures et avec plusieurs intervalles.
J'ai utiliséafin de cacher les lignes qui ne convenaient pas.
Code : Sélectionner tout - Visualiser dans une fenêtre à part Rows(compteur).EntireRow.Hidden = True
J'ai aussi rajouté un bouton afin de "défiltrer" ces lignes
Cependant, cette fonction "défiltre" aussi les lignes filtrées de manière plus traditionnelle par les utilisateurs (la petite flèche vers le bas et les cases à cocher/décocher et tout ce qui va avec).
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14 Private Sub CommandButton2_Click() Application.DisplayAlerts = False Application.EnableEvents = False Application.ScreenUpdating = False Dim longueur_tab As Integer Dim compteur As Integer longueur_tab = Range("J" & Rows.Count).End(xlUp).Row For compteur = 8 To longueur_tab Rows(compteur).EntireRow.Hidden = False Next compteur Application.DisplayAlerts = True Application.EnableEvents = True Application.ScreenUpdating = True End Sub
Avez-vous une idée pour conserver ces filtres? Ou peut être pour sauvegarder ces filtres afin de les désactiver puis de les réactiver.
J’espère avoir été assez clair
Bonne journée et merci d'avance !
Partager