Chercher une valeur dans une liste

joe -  
 Play With Me -
Bonjour,
Je bloque depuis pas mal de temps sur un petit pb :
J’ai 2 colonnes (A et B) remplies de chiffres.
il faut que je parcours la colonne B jusqu’à ce que je tombe sur une certaine valeur (pré-determinée au départ).
La valeur de la cellule dans laquelle j’écris la formule doit me renvoyer la valeur de la colonne A correspondant à la ligne de la colonne B qui correspond à la valeur cherchée.
exemple:
A B
1 2
4 8
7 1

Si je sélectionne '8', la valeur de la cellule dans laquelle j'ai écrit la formule doit me renvoyer '4'

J’espère que c’est clair et surtout que vous allez pouvoir m’aider...

Merci beaucoup,
Joe
Configuration: Windows XP
Internet Explorer 6.0

2 réponses

  1. michel_m Messages postés 18903 Date d'inscription   Statut Contributeur Dernière intervention   3 320
     
    Bonjour,

    Ca se résoud par des formules! pourquoi en prog. VBA? voir plutôt forum bureautique
    ...
    Si ta valeur est dans la cellule C1

    =INDEX(A1:A10;EQUIV(C1;B1:B10;0))

    et pour éviter des valeurs fantaisistes en C1
    tu fais une liste à validation de données B1:B10
    ou
    SI(NB.SI(B1:B10;C1)=0;"";INDEX(A1:A10;EQUIV(C1;B1:B10;0)))

    maintenant si tu tiens à du VBA:
    XL<2007

    nbre=range("C1")
    lig=columns(2).find(nbre,range("B65536")).row
    valeur=cells(lig,1)

    Michel
    0
  2. Play With Me
     
    Alors si t'es sur du Visual Basic c'est assez simple disons que tu as ta Form , 2 comboBox et un boutton cmd_1

    Sa donnerais dans

    Private Sub Form_Load ()
    ComboBox1.AddItem ("A")

    ComboBox2.AddItem ("B")
    End Sub

    Dim Sub cmd1_Click ()
    If ComboBox1.Text = "A" then
    ComboBox2.Text = B
    End If
    End Sub

    Voila
    0