|
shapeオブジェクトのフォントサイズ変更 |
- 01: 名前：kami 投稿日：2000/07/16(日) 00:42
- はじめまして。
現在Windows2000上にてVisio2000 Pro.を用いてツールを作成しているのですが、
drawRectangleメソッドによって生成したVisio.Shapeオブジェクトの、内部テキスト
のフォントサイズを変更する方法がわからずに悩んでおります。
一応、オンラインヘルプは一通り検索してみたつもりなのですが、未だにやり方が
わからないままです。
（DocumentオブジェクトからFontオブジェクトを取り出して・・・とか、
Shape.SectionでvisSectionCharacterを取り出してみたりとかしてみましたが・・・）
Shapeオブジェクトの内部テキストフォントのサイズ変更方法か、その情報への
ポインタでも、どなたかお教え願えませんでしょうか。
- 02: 名前：かど 投稿日：2000/07/16(日) 09:53
- かどです。
>現在Windows2000上にてVisio2000 Pro.を用いてツールを作成しているのですが、
>drawRectangleメソッドによって生成したVisio.Shapeオブジェクトの、内部テキスト
>のフォントサイズを変更する方法がわからずに悩んでおります。
VBA からの変更でしょうか？
shpObj.Cells("Char.Size").Formula = "36pt"
でどうでしょうか？
- 03: 名前：kami 投稿日：2000/07/16(日) 23:32
- >VBA からの変更でしょうか？
そうです。記述が抜けておりました。
>shpObj.Cells("Char.Size").Formula = "36pt"
>でどうでしょうか？
ありがとうございます。うまく設定できました。
フォントのサイズって、Shapeのセルで直接設定できたんですね・・・。
オンラインヘルプではそこまで追えなかったんですが、
見方が悪かったのでしょうか・・・。
|
|