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