| 
    
     |  | 早速お返事ありがとうございます。 
 >何のためにそのようなことをしたいのかがよくわからないのですが、
 
 [背景]とある決まった項目のあるテキストを読み込んで書き換えるマクロを作ってるんです。
 
 作るのは私なんですが、実際に使用するのは「マクロってなに?」という人達です。
 で、いずれ私の手から離れることになるマクロなので、どこにエラーが発生したかをメッセージとして出すことで、どこに問題があるかを明確にしておきたいんです。
 # 私の後任となる(未だ見ぬ人)のために。
 
 >とりあえず、こういうこともできると思います。
 > Set Cell01 = Range("A:A").Find("Data")
 > If Cell01 Is Nothing Then
 >  MsgBox "Dataが見つかりません"
 > End If
 
 それでもいいんですが、やはりそれだと項目1つずつに書かなくてはなりません。
 項目がたくさんあるので特別な記述なしにエラーがどの行で出ているかが分かれば、マクロを見れば問題が分かるので・・・。
 # うまく説明できてない気がします。。。分かっていただけたでしょうか?
 # ひとつずつエラーメッセージを出すのが使う人には優しいのかもしれませんが。
 
 マクロ側のエラーではなくて、元のテキストの問題点を見つけるためなんです。
 簡単にエラーの発生した行がわかる方法があるんじゃないかなーと思うんですが・・・。
 ないですかね。。。
 
 
 |  |