[リストへもどる]　　　[VBレスキュー(花ちゃん)]
一括表示
投稿時間：2005/10/14(Fri) 10:45
投稿者名：フォー
Ｅメール：
ＵＲＬ　：
タイトル：図形の存在の有無

ActiveSheet.Shapes("gurafu")

という図形をdeleteで消去したいのですが
もしこの図形が存在しない場合は削除の処理をすると
エラーになってしまうのでこの図形の存在を確かめる
という処理を行い、もし存在しない場合はdeleteの
処理を行いたくないのですが図形があるかどうかを
確認するという処理はどうすればいいのでしょうか？

投稿時間：2005/10/14(Fri) 10:56
投稿者名：　
Ｅメール：
ＵＲＬ　：
タイトル：Re: 図形の存在の有無
> エラーになってしまうのでこの図形の存在を確かめる
> という処理を行い、もし存在しない場合はdeleteの
> 処理を行いたくないのですが図形があるかどうかを
> 確認するという処理はどうすればいいのでしょうか？
例外処理をすればいいかと…

投稿時間：2005/10/14(Fri) 11:00
投稿者名：K.J.K.
Ｅメール：akiya@koalanet.ne.jp
ＵＲＬ　：
タイトル：Re: 図形の存在の有無
エラートラップをすればいいのでは。
それが嫌ならば、For EachでShapes.ItemのそれぞれのNameプロパティ
をチェックして、該当するものがあるかどうか調べるとか。

投稿時間：2005/10/14(Fri) 11:33
投稿者名：フォー
Ｅメール：
ＵＲＬ　：
タイトル：Re^2: 図形の存在の有無
> エラートラップをすればいいのでは。
> それが嫌ならば、For EachでShapes.ItemのそれぞれのNameプロパティ
> をチェックして、該当するものがあるかどうか調べるとか。

ありがとうございます。ためしてみます。

投稿時間：2005/10/14(Fri) 11:50
投稿者名：いな
Ｅメール：
ＵＲＬ　：
タイトル：Re^3: 図形の存在の有無
> ありがとうございます。ためしてみます。

ためしてみます。ではなく、
エラートラップするのは本当に嫌なのかを確認しましょう。
図形の有無さえ分かればいいのならば、手っ取り早い方法を取ると普通は思うのですが・・・。

この一言だけだと、機械的に、Nameプロパティを調べかねないので