XL 2010 Ajouter un critère sur find

[GHISLAIN]

Bonjour les exceliens ,
j'utilise depuis quelques années un code vba de notre amis Pierre-jean, Merci à lui.
Ce code permet de filtrer des données lors de sélection via deux choix

premier choix : Ligne 4
second choix : Ligne 3
je souhaite ajouter un troisième choix soit la ligne 2

Ci joint un fichier qui devrait être explicite

merci à vous pour vos solutions

bien amicalement

Ghislain

 

[GHISLAIN]

Bonjour le forum,

Après plusieurs recherche et test j'ai opté pour cette solution :

If c.Value = [Coul] And c.Offset(1).Value = [Num] And c.Offset(-1).Value = [Type] Then

k = 1

End If

n'étant pas sur que ce soit la bonne , merci pour votre retour

Amicalement

Ghislain

 

[GHISLAIN]

Re,

en faite ça ne fonctionne pas ............

:-/