vba et les filtres

[jef]

bonjour,

j'ai un petit probleme avec la fonction autofilter et plus particulierement avec la propriété visibledropdown qui permet de masquer les fleches du filtre
lorsque je veux mettre cette propriétè a FALSE j'ai un message d'erreur.

comment faire pour résoudre le probleme .

merci

 

[@+Thierry]

Re: vba et les filtres... VisibleDropDown masquer les Flèches d'un Autofilter

Salut Jef, le Forum

Il faut procéder comme suit avec la argument VisibleDropDown qui donc permet de masquer les flèches d'un AutoFilter, noramelemnt on peut faire ceci sur une colonne comme suit

Worksheets("Feuil1").Range("A1").AutoFilter field:=1, VisibleDropDown:=False

Mais pour le faire sur toute la plage AutoFiltée on peut faire comme ceci :

Sub FilterDropDownHide()
Dim i As Byte
For i = 1 To Range("A1").CurrentRegion.Columns.Count
Worksheets("Feuil1").Range("A1").AutoFilter field:=i, VisibleDropDown:=False
Next
End Sub

A noter aussi que l'on peut masquer ces flèches de cette manière là aussi :

ActiveWorkbook.DisplayDrawingObjects = xlHide

que l'on remettra avec :

ActiveWorkbook.DisplayDrawingObjects = xlAll


Bonne Soirée
@+Thierry

 

[jef]

Re: vba et les filtres... VisibleDropDown masquer les Flèches d'un Autofilter

Merci pour la réponse