Find in Recorded Macro

[Robert]

I cannot seem to identify the mistake is this recorded (and edited) macro.
Thde query text will appear in cell B1. Would appreciate assistance. Thank
you.

Sub Macro1A()

Cells.Find(what:=.Range("B1").Value, After:=ActiveCell,
LookIn:=xlFormulas, LookAt _
:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext,
MatchCase:= _
False, SearchFormat:=False).Activate
End Sub

 

[Rick Rothstein]

You have a "dot" in front of the Range reference, but you don't have a With
statement for it to reference back to. Try removing that dot and see what
happens.

 

[Robert]

Thanks Rick. I thought I tried all permutations.