VBA : Filtre * et chiffre

[Bens7]

Bonjour a tous alors je vous explique mon probleme :
J'ai un fichier qui me sert a rapeller mes clients quand il repond pas nous avons un code : *1, *2 , *7 ect....
cela veux dire que le client ne repond pas 1 fois, 2 fois, 7 fois ect....
J'ai besoin d'un bouton VBA pour filter les client qui ne respondent pas plus de 10 fois (*10 ou plus)
Alors je sais filtrer sur un mot exact :

Sub paimidi()
With Worksheets("ACTIF")
    If .FilterMode = True Then .ShowAllData
    
    'tri croisant
    Cells.Sort Key1:=[N2], Order1:=xlAscending, Header:=xlYes, _
    OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
  
    'filtre
    Range("A1").AutoFilter Field:=7, Criteria1:="M"


End With
End Sub

Mais comment faire un filter avec l'etoile en sachant que souvent c'est precede d'un text .
exemple :
Rapeller M.Lambert Mardi > *12
Courrier renvoyer le 8 juin > *4
ect....

Merci a tous !

 

[herve62]

Re : VBA : Filtre * et chiffre

Bonsoir
Teste un peu avec par ex : a = InStr(Range("a1"), "*")
donc tu vas avoir la position de ton * , ensuite tu extrais ton Nbre ( 7,12,...etc) et tu compares

 

[Bens7]

Re : VBA : Filtre * et chiffre

waw alors chui pas du tout au niveauc j'ai fait ce code avec l'enregistreur .... peut tu me mettre le code au complet ?

 

[Bens7]

Re : VBA : Filtre * et chiffre

Heu ptit UP ?

 

[Pierrot93]

Re : VBA : Filtre * et chiffre

Bonjour,

petite remarque au passage, pourquoi ne pas avoir une colonne dédiée au nombre d'appels... plus facile ensuite pour filtrer et même sans doute pour visualiser...

bonne journée
@+

 

[herve62]

Re : VBA : Filtre * et chiffre

Bonsoir

Heu ptit UP ?

c'est KI KI dors ??
met un bout de fichier cela sera plus direct !!