Discussion :

[damsmut]

Bonjour,

VBA EXCEL

J'ai écrit une formule que j'ai retranscrit en VBA :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

ActiveCell.FormulaR1C1 = "=VLOOKUP(R[-3]C,R[-2]C[-5]:R[3]C[-2],4,FALSE)"

Dans ce cas le résultat ainsi que la formule sont inscrits dans une cellule.



Peux t'on faire ce type de calcul dans VBA directement sans avoir à écrire les formules et résultats dans les cellules de la feuille ?

du style :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Résultat = une formule....
MsgBox = Résultat 'Pour afficher la réponse

Merci d'avance

[SfJ5Rpw8]

voir aide en ligne VBA excel sur

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

WorksheetFunction.VLookup

[damsmut]

j'y suis allé mais je n'arrive pas à afficher cette aide... ca plante.

Peux tu me fair eun copier coller de cet aide

merci

[ouskel'n'or]

Regarde dans l'aide à

Liste des fonctions de feuille de calcul disponibles dans Visual Basic

Tu as la liste de toutes les fonctions Excel que tu peux utiliser dans VBA.

[damsmut]

oais mais la je n'ai que la description pour utiliser la formule normalement, pas en vba

[ouskel'n'or]

Dans

"=VLOOKUP(R[-3]C,R[-2]C[-5]:R[3]C[-2],4,FALSE)"

Tu dois remplacer les R[-3]C, R[-2]C, etc. par l'adresse de tes cellules en format "A1"
Ensuite, tu dois mettre les guillemets aux bons endroits pour reconstituer la formule et quand tu en es là, si tu as un pb, tu dis
Quant à un exemple d'utilisation de WorksheetFunction.Fonction, tu as un exemple dans l'aide à WorksheetFunction

A+

[damsmut]

C'est bon j'ai trouvé :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
 
Sub Essai()
 
    test = WorksheetFunction.VLookup("abcd", Range("A1:B20"), 2, False)
 
    MsgBox test
 
End Sub