[VBA excel] find avec 2 critères de recherche

annyong Messages postés 38 Date d'inscription lundi 23 avril 2007 Statut Membre Dernière intervention 25 février 2015 - 14 mai 2007 à 15:39
cs_MPi Messages postés 3877 Date d'inscription mardi 19 mars 2002 Statut Membre Dernière intervention 17 août 2018 - 14 mai 2007 à 23:08
bonjour,

j'ai un problème avec mon find
je dois rechercher dans une colonne une valeur numérique. si je la trouve, et que l'identifiant de cette valeur (sur la cellule d'à côté) est correct (égal à "parametre1", tout va bien
sinon, (si l'identifiant d'à côté n'est pas égal à "parametre1") je dois chercher la suivante. et c'est la mon problème.
il faudrait que je puisse intégrer 2 critères de recherche :
c'est à dire trouver la valeur numérique que je cherche et aussi que le nom de la cellule d'à côté soit "mon_identifiant", sinon, findnext .

Sauriez vous comment faire ??

merci !

3 réponses

jrivet Messages postés 7392 Date d'inscription mercredi 23 avril 2003 Statut Membre Dernière intervention 6 avril 2012 60
14 mai 2007 à 15:44
Salut,
Lorsque tu fais ton Find + Activate tu peux très bien tester la valeur de la cellule adjacente et faire un findnext le moment souhaité.
Pour t'aiguiller encore mieux il faudrait que tu nous place un peu plus de code. NON?

@+: Ju£i?n
Pensez: Réponse acceptée
0
mortalino Messages postés 6786 Date d'inscription vendredi 16 décembre 2005 Statut Membre Dernière intervention 21 décembre 2011 18
14 mai 2007 à 15:47
Salut,

tu peux aussi faire une boucle dans ta colonne,
exemple :

    Nom      Age      Lieux
1    A        10       AAA
2    B        20       BBB
3    C        30       CCC

4    B        20       AAA

Tu cherches les personnes de 20 ans, habitant à AAA :

Dim i As Long, DLV As Long

DLV = Range("B65536").End(xlUp).Row

For i = 2 To DLV
    If Cells(i, 2).Value = 20 Then
        If Cells(i, 3).Value = "AAA" Then MsgBox "Nom : " & Cells(i, 1).Value: Exit For
    End If
Next i
~
<small>[code.aspx?ID=39466 Mortalino] ~
Colorisation automatique</small>

@++


  --Mortalino--
Le mystérieux chevalier, ~Provençal, le Gaulois~
  
0
cs_MPi Messages postés 3877 Date d'inscription mardi 19 mars 2002 Statut Membre Dernière intervention 17 août 2018 23
14 mai 2007 à 23:08
Et tu peux aussi concaténer tes 2 colonnes dans une autre colonne quelque part
Et tu fais la recherche sur cette colonne.

Si tu recherches une valeur en A et en B, tu mets en Z1   =A1&B1
tu copies cette formule tout le long de la colonne de données

Set ValeurRecherchée = Columns("Z:Z").Find(ValeurEnA & ValeurEnB)

MPi
0
Rejoignez-nous