Find a Value in Range, using Cell value?

[farmboy471]

This should be simple, but it is eluding me..
　
How do I put a cell value from worksheet into a statement in VB to find a given value in a range….?

Example:
Instead of this > Set Foundcell = Sheets("Event Records").Range("a2:a2298").Find("1002") This works, but I want to put in a cell value from a worksheet

I need something like this >
Set Foundcell = Sheets("Event Records").Range("a2:a2298").Find = { (Sheets("BlankForm").Range("R8").Value) }

Or thinking something like this >
Sheets("BlankForm").Select
RecordNbr = Range("R8").Value
Sheets("Event Records").Select
Set Foundcell = Sheets("Event Records").Range("a2:a2298").Find(SetValue=RecordNbr)
　
Got any ideas…?

 

[JoeMo]

.Find(Sheets("BlankForm").Range("R8").Value)

 

[farmboy471]

Thank You, Thank You, Just a beginner at this.. Lots to learn..