VBA .range.findエラー "ブロック変数が設定されていません"

Question

私はちょうど問題が何であるかを見ているようです。

私が試した：

Dim findRow As Integer 
Dim findRow As Range 
Dim findRow As Excel.Range 

それらはすべて同じエラーを与えます。 私は.withを試してみましたが、ここで.width

せずに私のコードです：

Dim findRow As Excel.Range 

findRow = ActiveWorkbook.Worksheets("AllAgents").Range("F:F").Find(What:=strEmail(1), LookIn:=xlValues) 

With ActiveWorkbook.Worksheets("AllAgents") 
    MsgBox (.Cells(2, 6)) 
    findRow = .Range("F:F").Find(What:=strEmail(1), LookIn:=xlValues) 
End With 

MsgBoxには、正しい値を示し、それがあります。 - あなたがオブジェクト変数を割り当てているので、Setが必要です

Answer 1

Set findRow = ...：

これは私が取得エラーです。