|
▼すが分 さん:
こんばんは
私も、シェープの種類、階層、それぞれの階層でのプロパティ。
こんなものを網羅して説明しているページがないかという質問をしたことがあります。
また、ざっと一覧で表示できる手法がないかと調査したこともありました。
でも、その時いただいた回答では、「そんなものはない」ということでしたし
その後、シェープに関する処理を自分でおこなうにつけ、「これは無理だなぁ」と
実感しました。
超エキスパートさんなら、あるいは、そのようなオブジェクト階層を、VBAで
網羅的に取り出す手法もご存じかもしれませんが。
で、私がやった方法は、実に原始的なもので、シートに、自分が知っているシェープを
すべて配置。で、それらを
Sub Test()
Dim sp As Shape
For Each sp In ActiveSheet.Shapes
Next
End Sub
こんなコードを書いて、ローカルウィンドを表示させた状態でステップ実行。
Nextが黄色くなるたびに、ローカルウィンドウの SP の階層をかたっぱしから開いて
どの階層に、どんなオブジェクト・プロパティがあるか、プロパティの場合、その値は
何か、そんなことをメモしてリファレンスにしました。
もし、どのシェープも同じオブジェクト・プロパティを持っているなら、お望みのようなコードで
情報を取得することもできるでしょうが、シェープによって、そもそもが、どんなものを
内包しているのかが、まちまちですので。
今でもしょっちゅうこのリファレンスを参照しますが、それでも、だんだん、リファレンスを
いちいち見なくても、頭に入ったものも多くなってきています。
|
|