Vlookup in VBA

[DaveSwanton77]

I am trying to write a procedure to lookup a number against a list of controlling managers using the Ondoubleclick property

Sub Auto_Open()
Worksheets(1).OnDoubleClick = "Check_name"
End Sub

Sub Check_name()
name1 = VLookup(r1c1, contacts, 4, False)
MsgBox (name1)
End Sub

But I keep getting the error Sub or function not defined.

Help!!!!!

[Ricky Morris]

On 2002-04-23 10:22, DaveSwanton77 wrote:
I am trying to write a procedure to lookup a number against a list of controlling managers using the Ondoubleclick property

Sub Auto_Open()
Worksheets(1).OnDoubleClick = "Check_name"
End Sub


Sub Check_name()
name1 = VLookup(r1c1, contacts, 4, False)
MsgBox (name1)
End Sub

But I keep getting the error Sub or function not defined.

Help!!!!!

Try:
name1 = worksheetfunction.VLookup .....

[HunterN]

Hi!

Just curious how you would define the table array as 'Contacts' so you can use it as an argument?

Thanks

[DaveSwanton77]

Thanks Ricky that stopped me scratching my head!

[DaveSwanton77]

Its defined as

Worksheets(1).Range("a1:e16")


Dave