Fonction VLookup transposee a VBA

Bonjour a tous,

Tout d'abord excusez moi le clavier querty sans accents.

Depuis peu j'utilise beaucoup le forum pour mon boulot. J'essaye de trouver au maximum des raisons sur des sujets resolus mais la je bloque (pourtant c'est pas complique...)

Du coup je voudrais transposer un vlookup sur une macro mais pour exactement la meme utilisation : remplir la cellule avec la reponse.

Ma base que j'avais mis dans excel est :

B5 =VLOOKUP(B7,Items,2,FALSE) (avec "Items" une table - dans la feuille du meme nom)

J'ai essaye de creer une fonction mais vba n'a pas l'air d'aimer ma syntaxe. D'habitude je reprend des fonctions existantes et je les arrange a ma facon du coup je ne suis pas calee en syntaxe.

J'aimerai faire quelque chose comme ca :

Sub Complete_Table()
    [B5] = VLookup(Range("B7"), Sheet("Items"), 2, False)
End Sub

Sauf que je ne sais pas si c'est possible de rentrer directement le VLookup dans la cellule comme ca.

Sinon peut etre :

Sub Complete_Table()
    Dim value As '?? que dois-je mettre ?
     value = VLookup(Range("B7"), Sheet("Items"), 2, False)
    [B5] = value
End Sub

Merci beaucoup de votre aide !

Bonsoir,

Il est vrai mais mon fichier etait un peu complexe du coup je n'osais pas.

J'ai un peu simplifie.

J'aimerai que la macro "Complete_Table" me sorte Sauce Cup en B5 a la place de la fonction que j'ai ecrite sur la feuille excel.

Par la suite j'aimerai que tous mes VLookup avec pour reference B7 (finished good #) soient sur une seule macro (Complete_Table) et qu'elle ne soit pas trop complique si possible. Je le ferai quand j'aurai un exemple au moins

Je precise que je voudrais faire la meme chose que ce que je fais deja par une macro afin d'avoir plus de liberte sur les cases que je rempli par ma macro (que je puisse en modifier une hors macro si besoin)

J'ai trouve toute seule

Sub Complete_Table()
    [B5] = Application.WorksheetFunction.VLookup([B7], Sheets("Items").Range("B:X"), 2, False)
End Sub

(Oui je cherchais juste la syntaxe pour le Vlookup, j'etais pas loin !)