質問: .Cells.Find(Job_name, LookAt:=xlWhole).Rowこの文章がエラーになって困っています。何が原因なのかサンプルどおり書いているつもりなんですがわからなくて。どなたかご教授いただけたらと思います。
回答: cells.Findはあてはまるセルが見つかったときにはRangeオブジェクトを返しますが、 あてはまるセルが見つからなかった時にはNothing を返します。 Nothingには当然、.Rowというオブジェクト変数はありません。 ですから、正しくは Y_line = .Cells.Find(Job_name, LookAt:=xlWhole).Row ではなく、 If Not Obj Is Nothing Then Y_line = Obj.Row End If ではないのでしょうか。