07/08/27 09:52:45
>743ですが、Findのヘルプに載っている
使用例に下記一行を加えただけです。
Set d = Worksheets(2).Range("a1:a500").Find(2, lookin:=xlValues)
この一行が無ければ、動きます。
この一行を追記しただけでエラーになる理由が知りたいです。
07/08/27 09:52:45
>743ですが、Findのヘルプに載っている
使用例に下記一行を加えただけです。
Set d = Worksheets(2).Range("a1:a500").Find(2, lookin:=xlValues)
この一行が無ければ、動きます。
この一行を追記しただけでエラーになる理由が知りたいです。