VBA

Question

で関数を探す私はしかし、私はExcelが自動セルを選択することを期待して、それに値「abc」が含まれていた

Sub search() 
Range("B1:B7").Find("abc").Activate 
End Sub 

を書き込むことによって、簡単にデモを始め、私は「オブジェクト変数を言うエラーメッセージが表示されましたまたはブロック変数が設定されていません "。私は何でも忘れましたか？

ありがとうございます。

Answer 1

"https://msdn.microsoft.com/en-us/library/office/ff839746.aspx"

Sub tester() 
    With Worksheets(6).Range("B1:B500") 
     Set c = .Find("Smith Jon Junior", LookIn:=xlValues) 
     If Not c Is Nothing Then 
      firstAddress = c.Address ' not required 
      c.Activate 
     else 
      msgbox ("Not Found") 
     End If 
    End With 
End Sub