だから私はVBAをよく理解していると思っていましたが、今ではこのエラーが本当に私を悩ませており、問題を理解できません. これは信じられないほど短いサブルーチンです (モジュールから実行):
Sub test()
Dim lr
lr = Sheets(1).Range("a1", Cells(65, 1))
MsgBox lr.Address
End Sub
何らかの理由で、これは「アプリケーション定義/オブジェクト定義エラー」をスローします
誰でも説明できますか?
編集:これも同じエラーをスローします:
MsgBox Sheets(1).Range("a1", Cells(65, 1)).Address
Edit2:オブジェクトのことについて理解しているので、質問を少し変更しますが、「find」メソッドで何を使用するか。コードは次のとおりです。
Set lookrange = Sheets(1).Range(Cells(2, 1), Cells(200, 1))
Set result = lookrange.Find(what:=searchTerm, lookat:=xlWhole)
この場合、lookrange が問題を引き起こしていることがわかります。