Chercher une valeur dans une liste

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

  • Votes
  • Date
  • Date décroissante
  1. Contributeur
    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
    1. 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