Gestion des filtres dans une macro

[sunguess]

Bonjour,

J'ai créé une macro déclenchée par un bouton permettant d'activer un filtre.
Le problème est que le filtre est correctement activé mais n'affiche rien.

Le code est le suivant :

Sub Filtre()
    Dim Var3 As String
    Var3 = ActiveCell.Value
    Var3 = Round(Var3, 0)
    Var3 = Format(Var3, " # ##0 €")
    AutoFilterMode = False
    ActiveSheet.Range("$B$3:$C$11").AutoFilter Field:=2, Criteria1:=Var3
End Sub

Je vous joint le fichier.

La valeur est saisie en euro dans la cellule C1 et le bouton est juste à coté.

Quelqu'un peut il me dire ce que je dois changer dans mon code ?
est ce un bug d'excel? dans ce cas y a t'il une solution

merci pour votre aide

 

[CBDORVAL]

Re : Gestion des filtres dans une macro

J'ai regardé ton fichier et si j'inscrit 11 en C1 je vois apparaître les lignmes 4 et 11 qui contiennent 11 en C.
Tout me semble OK

 

[sunguess]

Re : Gestion des filtres dans une macro

le problème c'est que la cellule C4=10,56 et la cellule C10=11,23

quand je mets 10,56 en C1 et que je lance la macro, ca marche pas et pourtant dans le filtre 11€ est bien coché !

 

[CBDORVAL]

Re : Gestion des filtres dans une macro

Voir fichier joint

 

[sunguess]

Re : Gestion des filtres dans une macro

je n'ai pas vu de changement dans le fichier que tu ma joins.

Je précise que le fichier est un fichier exemple et que je dois absolument gérer le filtre par macro (et non manuellement)

 

[CBDORVAL]

Re : Gestion des filtres dans une macro

J'ai mis une liste dérouilante en C1 qui est composé des valeurs de C3:C11, et j'applique ton filtre, et je ne vois que les valeurs corresdpondantes.

 

[sunguess]

Re : Gestion des filtres dans une macro

merci CBDORVAL.

Mais l'objet n'est pas de mettre un filtre manuel mais de résoudre mon problème de format dans la macro