Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


36818 / 76732 ←次へ | 前へ→

【45090】コメントの扱いを教えて下さい。
質問  よちよち  - 06/12/12(火) 15:34 -

引用なし
パスワード
   問題なく動いていたのに、セルに「コメント」を挿入したらエラーが出ました。
エラーの原因を見つけるために、該当部分だけ(下記)を絞り込んだのですが、
原因は判りません。
シートに楕円や四角の図形があるだけならエラーなく動きますが、どこかのセルに「コメント」を登録すると、SHA.Selectの行で、
 'Select' メッソッドは失敗しました'Shape'オブジェクト のエラーが発生します。
どうも「コメント」が悪さをしているようですが、回避策はありませんか?

Sub ABC()
  For Each SHA In ActiveSheet.Shapes
    SHA.Select
    If TypeName(Selection) = "Rectangle" Then
      MsgBox TypeName(Selection) & "を見つけました。"
    End If
  Next SHA
End Sub

0 hits

【45090】コメントの扱いを教えて下さい。 よちよち 06/12/12(火) 15:34 質問
【45092】Re:コメントの扱いを教えて下さい。 Kein 06/12/12(火) 15:50 回答
【45095】Re:コメントの扱いを教えて下さい。 よちよち 06/12/12(火) 16:23 質問
【45099】Re:コメントの扱いを教えて下さい。 Kein 06/12/12(火) 16:55 回答
【45115】Re:コメントの扱いを教えて下さい。 よちよち 06/12/13(水) 9:51 お礼

36818 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free