XL 2019 VBA désactiver filtre(s) actif(s) sans enlever filtre automatique

Lionel69890 · 9 Février 2023

Bonjour à tous,

J'ai un tableau sur lequel un filtre automatique est présent sur la plage "B2:BT2000"
Avant de lancer une macro j'aimerai désactiver tous les filtres actifs qui pouraient être actifs sur mes différentes colonnes sans pour autant enlever le filtre automatique

Quelqu'un peut-il m'indiquer le bout de code qui m'est nécessaire ?

Merci d'avance pour votre aide
Lionel

Oneida · 9 Février 2023

Bonjour,

devrait aller, B2 doit etre l'entete de colonne

VB:

ActiveSheet.AutoFilterMode = False
    ActiveSheet.Range("B2:B2000").AutoFilter

Oneida · 9 Février 2023

Bonjour,

devrait aller, B2 doit etre l'entete de colonne

VB:

ActiveSheet.AutoFilterMode = False
    ActiveSheet.Range("B2:B2000").AutoFilter

Lionel69890 · 9 Février 2023

Parfait merci beaucoup

Cousinhub · 9 Février 2023

Bonjour,
Ou peut-être?

VB:

With ActiveSheet
    If .FilterMode Then .ShowAllData
End With

Bonne journée

XL 2019 VBA désactiver filtre(s) actif(s) sans enlever filtre automatique

Lionel69890

XLDnaute Junior

Oneida

Oneida

XLDnaute Impliqué

Lionel69890

XLDnaute Junior

Cousinhub

XLDnaute Barbatruc

Discussions similaires