recherchev dans une variable tableau

formateurmasque

XLDnaute Junior
Bonjour,

Je voudrai faire une RECHERCHEV ou VLOOKUP dans une variable tableau
Tab(150,3).

Est ce possible ? si oui, quelle est la syntaxe ?

Merci d'avance.

FM
 

tototiti2008

XLDnaute Barbatruc
Re : recherchev dans une variable tableau

Bonjour Formateurmasque,

Tu as le choix : créer une fonction de recherche dans un tableau ou
transférer le contenu de ton tableau dans un objet Range pour pouvoir utiliser VLOOKUP dans ton code.
 

BOISGONTIER

XLDnaute Barbatruc
Repose en paix
Re : recherchev dans une variable tableau

Bonjour,

Code:
Sub essai()
  Dim Tbl(1 To 2, 1 To 10)
  Tbl(1, 1) = "aaa"
  Tbl(1, 2) = "bbb"
  Tbl(1, 3) = "ccc"
  Tbl(2, 1) = 11
  Tbl(2, 2) = 22
  Tbl(2, 3) = 33
  ValCherchée = "ccc"
  result = Tbl(2, Application.Match(ValCherchée, Application.Index(Tbl, 1), 0))
  MsgBox result
End Sub

Sous forme d'une fonction:

Code:
Sub essai()
  Dim tbl(1 To 2, 1 To 10)
  tbl(1, 1) = "aaa"
  tbl(1, 2) = "bbb"
  tbl(1, 3) = "ccc"
  tbl(2, 1) = 11
  tbl(2, 2) = 22
  tbl(2, 3) = 33
  Valcherchée = "ccc"
  MsgBox RechercheVTab(tbl, "ccc")
End Sub

Function RechercheVTab(tbl, Valcherchée)
  RechercheVTab = tbl(2, Application.Match(Valcherchée, Application.Index(tbl, 1), 0))
End Function


JB
Formation Excel VBA JB
 
Dernière édition:

Statistiques des forums

Discussions
312 927
Messages
2 093 674
Membres
105 781
dernier inscrit
Dominique G.