[Résolu] Critère filtre + Macro Chemin vers dossier

[Brudy]

Bonjour à vous tous,

J'ai réussis à trouver une macro de filtre élaboré qui me plait. Mais elle comporte un seul critère.

Je n'arrive pas à retranscrire la macro sur mon fichier.. alors pour en rajouter un deuxième

Est ce que quelqu'un pourrait me dire ce qui cloque sur mon fichier ?

(Il y'a plusieurs macro, une pour valider/trier par ligne réalisée par Theze, une autre macro enregistré pour enregistrer en pdf et la troisième, celle du tri)

Le code module :

Sub filtre()
Range("base").AdvancedFilter Action:=xlFilterCopy, CriteriaRange:=Range( _
"crit"), CopyToRange:=Range("extrait"), Unique:=False
Range("b3").Activate


End Sub

Code sur feuille :

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
       If Not Application.Intersect(Target, Range("b3")) Is Nothing Then
       Call filtre
       End If
End Sub

 

[Brudy]

Ok donc c'était juste le slash, merci modeste tu cartonne !


Même si ce n'était pas de bon matin, c'était de qualité