Greetings to all,
First off, I would like to thank anyone who can help me. I appreciat
your effort and your time.
When I run the procedure below, I get a run-time error 1004 with th
following message "Unable to get the VLookup property of th
WorksheetFunction class".
I started by typing the code and then chose to use the pull down men
for the property in hopes that this would fix the error. However, i
did not work.
I am greatful for any assistance.

Sub Get_NY_Contract()
Dim Contract As Variant
Dim Flow As Double

Contract = InputBox("Enter NY Contract Number")
Sheets(1).Activate
Flow = WorksheetFunction.VLookup _
(Contract, Range("E:I"), 5, False)

MsgBox Contract & "DA" & Flow
End Su

--
oakma
-----------------------------------------------------------------------
oakman's Profile: http://www.excelforum.com/member.php...nfo&userid=917
View this thread: http://www.excelforum.com/showthread.php?threadid=31436