Set range with Find method
The problem is with Env.
I don't see where it is Set. This does work:
Sub fhskdf()
Dim Con1 As Range
Set Con1 = Range("A1:A65").Find("1stConverting Run", LookIn:=xlValues)
MsgBox (Con1.Address)
End Sub
--
Gary''s Student - gsnu200817
"jlclyde" wrote:
Dim Env As Worksheet
Env.Activate
Dim Con1 As Range
Set Con1 = Env.Range("A1:A65").Find("1stConverting Run",
LookIn:=xlValues)
I am trying to set the cell that is found as the range Con1. What is
wrong with this?
Thanks,
Jay
|