[Macro Excel] commande Selection.AutoFilter

Fermé
dgmm Messages postés 1 Date d'inscription lundi 7 mai 2007 Statut Membre Dernière intervention 7 mai 2007 - 7 mai 2007 à 11:21
 Ricou - 2 juil. 2007 à 22:27
Bonjour,

Sous Excel, je développe un outil d'Aide à la Décision dans lequel je crée des macros permettant d'automatiser la saisie de critère(s) de Filtre(s) Personnalisé(s), et de l'affichage du résultat.

J'ai une colonne que je dois filtrer qui est le résultat d'un calcul de pourcentage (Format %).

Lorsque je crée ma macro avec un taux prédéfini (ex 5%); tout fonctionne correctement :

Sub Filtre_Tx_Prov()

Selection.AutoFilter Field:=21, Criteria1:="<=5%", Operator:=xlAnd
Range("A3").Select

End Sub


En revanche, lorsque je veux que l'utilisateur saisisse le taux, le filtre me masque toutes les lignes comme s'il avait sélectionné les lignes "vides".

Sub Filtre_Tx_Prov()

Dim Taux As String
Taux = InputBox("Inférieur au taux de Provision")
Taux = Taux

MsgBox Taux 'Afficher variable pour contrôle, non nécessaire

Dim Crit As String
Crit = "<=" & Taux & "%"
MsgBox Crit 'Afficher variable pour contrôle, non nécessaire



Selection.AutoFilter Field:=21, Criteria1:="Crit", Operator:=xlAnd
Range("A3").Select

End Sub

J'ai essayé avec des variables de type Integer, Double et String. J'ai également essayé de rentrer la variable Taux dans la zone Criteria1, le résultat est toujours le même : affichage des lignes "vides".

Avez vous déjà rencontré ce type de problème ?

Merci d'avance de votre collaboration, de votre aide.

Cordialement
A voir également:

1 réponse

Heuu... Essaye sans les "
Selection.AutoFilter Field:=21, Criteria1:=Crit, Operator:=xlAnd
0