Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Macro pour filtre personalisé

P

phil

Guest
Bonjour,
J'ai écrit la macro suivante, afin de faire un fitre personalisé, qui filtre toutes les lignes qui contienent les caractères saisis par une inputbox
(la colonne filtrée est paramétré en dur pour l'exemple, ici colonne 9) :

Sub Filtre_Perso9()
critere = CStr("*" & InputBox("Entrer le critère du filtre") & "*")

Selection.AutoFilter Field:=9, Criteria1:=critere, Operator:=xlAnd
Range("A1").Select

End Sub


Jusque là, tout va bien. Le seul problème, c'est que si les caractères saisis sont des chiffres, ça ne marche plus ! Excel n'affiche aucune ligne.
Si quelqu'un a une idée, ça serait gentil, merci !

Phil
 
S

sousou

Guest
Le problème est q'un nombre n'est pas une chaine de caractère.
Pour retrouver un chiffre dans un nombre, il faut transformer ce nombre en chaine de caractère. du genre( texte()).

Il n'est pas certain que cela de facilite la vie
 

Discussions similaires

Réponses
8
Affichages
894
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…