Excel VBA質問箱 IV

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

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


8822 / 76732 ←次へ | 前へ→

【73478】Re:オートシェイプのプロパティの種類と値をセルに書き出す
発言  UO3  - 13/1/14(月) 20:13 -

引用なし
パスワード
   ▼すが分 さん:

こんばんは
私も、シェープの種類、階層、それぞれの階層でのプロパティ。
こんなものを網羅して説明しているページがないかという質問をしたことがあります。
また、ざっと一覧で表示できる手法がないかと調査したこともありました。

でも、その時いただいた回答では、「そんなものはない」ということでしたし
その後、シェープに関する処理を自分でおこなうにつけ、「これは無理だなぁ」と
実感しました。

超エキスパートさんなら、あるいは、そのようなオブジェクト階層を、VBAで
網羅的に取り出す手法もご存じかもしれませんが。

で、私がやった方法は、実に原始的なもので、シートに、自分が知っているシェープを
すべて配置。で、それらを

Sub Test()
  Dim sp As Shape
  
  For Each sp In ActiveSheet.Shapes
  Next
  
End Sub

こんなコードを書いて、ローカルウィンドを表示させた状態でステップ実行。
Nextが黄色くなるたびに、ローカルウィンドウの SP の階層をかたっぱしから開いて
どの階層に、どんなオブジェクト・プロパティがあるか、プロパティの場合、その値は
何か、そんなことをメモしてリファレンスにしました。

もし、どのシェープも同じオブジェクト・プロパティを持っているなら、お望みのようなコードで
情報を取得することもできるでしょうが、シェープによって、そもそもが、どんなものを
内包しているのかが、まちまちですので。


今でもしょっちゅうこのリファレンスを参照しますが、それでも、だんだん、リファレンスを
いちいち見なくても、頭に入ったものも多くなってきています。
352 hits

【73471】オートシェイプのプロパティの種類と値をセルに書き出す すが分 13/1/14(月) 10:33 質問
【73472】Re:オートシェイプのプロパティの種類と値... カリーニン 13/1/14(月) 11:26 発言
【73473】Re:オートシェイプのプロパティの種類と値... カリーニン 13/1/14(月) 11:38 発言
【73474】Re:オートシェイプのプロパティの種類と値... すが分 13/1/14(月) 14:44 質問
【73475】Re:オートシェイプのプロパティの種類と値... カリーニン 13/1/14(月) 15:13 発言
【73478】Re:オートシェイプのプロパティの種類と値... UO3 13/1/14(月) 20:13 発言
【73479】Re:オートシェイプのプロパティの種類と値... UO3 13/1/14(月) 20:55 発言
【73481】Re:オートシェイプのプロパティの種類と値... すが分 13/1/14(月) 22:15 お礼

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