Probleme macro vllookup

Bonjour

dans le fichier ci-joint vous pouvez vous ma macro rechercheV

Sub test()

Dim heud4 As Double
Dim heud2 As Double
Dim heud3 As Double

heud4 = Application.WorksheetFunction.VLookup(heud3, Range("heud2"), 2, True)

End Sub

Celle ci ne marche pas.. qqun saurait pourquoi?

Cordialement

Bonjour

Essaies

Sub test()
Range("heud4") = Application.WorksheetFunction.VLookup(Range("heud3"), Range("heud2"), 2, True)
End Sub