Find Macro

[karldenton]

Hi,
I'm trying to write a macro to find a specific cell in Excel.

I am typing the value into Cell B9 and want it to search from C15:C300.

However, when i click search it highlights cell B9, which is logical as that is whats its looking for.

The macro i have got so far is:

Sub TESTING2()

Cells.find(What:=Range("B9"), After:=ActiveCell, LookIn:=xlFormulas, LookAt _
:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _
False, SearchFormat:=False).Activate
Cells.FindNext(After:=ActiveCell).Activate


End Sub

I have tried changing the After section to After:=.Cells(15,3) but still the same.

Any ideas?

Thanks