cherche occurence avec 2 critères (vba)[Resolu]

herve62

XLDnaute Barbatruc
Bonsoir
J'aimerai savoir si un code simple ( j'ai vu des ex. assez complexes !!!) peut permettre de rechercher une occurence à 2 critères : 2 colonnes et afficher ce qu'il y a dans la 3eme
petit exemple joint , il parait que cela fonctionne ? je pige pas le fonctionnement et cela ne marche pas
 

Fichiers joints

mapomme

XLDnaute Barbatruc
Supporter XLD
Bonsoir @herve62 ;),
Voir ce code:
VB:
Sub cherche()
   prod = "piton 5"
   paq = 20             'nombre et non pas texte
   For Each C In Sheets("Feuil1").Range("d2:d50")
      If Not C = "" Then
         If C = prod And C.Offset(0, -1) = paq Then MsgBox "Occurence trouvée à " & C.Offset(0, 1) & "€"
         ' exit sub 'si on veut quitter après la première occurence
      End If
   Next C
End Sub
 

Créez un compte ou connectez vous pour répondre

Vous devez être membre afin de pouvoir répondre ici

Créer un compte

Créez un compte Excel Downloads. C'est simple!

Connexion

Vous avez déjà un compte? Connectez vous ici.

Haut Bas