Suppression du bouton d’un filtre
b
Bonjour,
J’ai mis un filtre automatique sur les 5 colonnes de mon tableau. Mon but est de laisser uniquement le bouton des filtres sur les colonnes " A " et " D " dans l’exemple joint et de supprimer les autres.
Maintenant, est-ce possible ?
Mon 1er message m’a apporté une solution trop compliquée à mettre en œuvre dans mon fichier d’origine, qui, même compressé fait encore 340 ko.
Cette demande, si elle est possible, suffirait à mon problème.
Je vous en remercie par avance.
Bien cordialement.
Bonjour
Avec ce code :
Sub Filtre()
Application.ScreenUpdating = False
Dim c As Range
For Each c In Range("A4:E4")
Select Case c.Address
Case "$B$4", "$C$4", "$E$4" 'cellules non filtrées
c.AutoFilter Field:=c.Column, Visibledropdown:=False
Case Else
c.AutoFilter Field:=c.Column, Visibledropdown:=True
End Select
Next
End SubAmicalement
Nad
b
C'est vraiment formidable ... ce forum
Merci beaucoup Nad