usar "buscarv" (o VLookup) en una macro

"Jorge" escribió

En el siguiente ejemplo:

A B
1 Numero letra
2 4 D
3 2 B
4 3 C
5 1 A
6
7 3

Quiero hacer una macro que ponga en B7 la letra que corresponda al numero
que se indica en A7 buscandolo en la tabla A1:B5

Yo intenté con:


Sub Macro1()

Range("B7").Value = VLookup(A7, A1:B5, 2, FALSO)

End Sub


Pero me da error. Qué estoy haciendo mal?
Gracias por adelantado

Hola Jorge,

Cambia lo que has escrito por lo siguiente:

range("B7")=application.WorksheetFunction.VLookup(range("A7"),range("A2:B5"),2)

El error salta porque vlookup, no es ninguna función de vba o no has
definido ninguna función con ese nombre.

Para emplearla puedes hacer lo que te he indicado o escribirla en la celda,
pero no creo que esa sea tu intención, de todas formas te la paso también:

range("C7").Formula="=VLookup(" & range("A7") & " ,A2:B5,2)"

Un saludo,
Juan