Application.DefaultTextUnits プロパティ (Visio)
角度を表す数値に適用される既定の寸法単位を判別します。 値の取得と設定が可能です。
構文
式。DefaultTextUnits
expressionApplication オブジェクトを 表す変数。
戻り値
バリアント型
注釈
DefaultTextUnits プロパティは、[Visio オプション] ダイアログ ボックスの [詳細設定] タブの [表示] の [テキスト] ボックスに表示される値に対応します ([ファイル] タブの [オプション] > )。
戻り値には、Microsoft Visio タイプ ライブラリで宣言されている VisUnitCodes のいずれかの値が含まれています。
DefaultTextUnits の値を整数 (VisUnitCodes のメンバー) または "pt" などの文字列値として指定できます。 文字列が無効な場合、または単位のコードが適切でない (テキスト以外である) 場合は、エラーが生成されます。
オートメーション定数 (整数値) に対応する有効な単位文字列の完全な一覧については、「単位について」を参照してください。
特定の寸法単位を含むセルの数式は、テキストの既定の単位設定に関わらず、その数式の単位で表示されます。 ただし多くのセルの数式は、暗黙的な単位の構文を使用し、既定の単位で表示されます。
セルの Formula プロパティを暗黙的な単位の構文に設定することにより、既定の単位で表示される数式を持つセルをプログラムで作成できます。 たとえば、数式"=8[pt,T]"
は DefaultTextUnits プロパティが visPoints であるかのように表示され"8 pt"
、DefaultTextUnits プロパティが visCiceros であるかのように"0.6272"
表示されます。
または、プログラムで次のステートメントを使用して、セルの結果を既定のテキスト単位に設定することもできます。
vsoCell.Result(visTextUnits) = 12
この場合、テキストは、DefaultTextUnits プロパティが visPoints であると 12 ポイントになり、DefaultTextUnits プロパティが visCiceros であると 12 シセロになります。
サポートとフィードバック
Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。