Application.FormatResultEx メソッド (Visio)
書式形式に従って文字列または数値を文字列に変換し、指定した縮尺と書式設定の単位を使用して書式設定します。 日付文字列または時間/日付文字列の場合は、文字列の言語およびカレンダーのタイプをオプションで設定します。
構文
式。FormatResultEx (StringOrNumber、 UnitsIn、 UnitsOut、 Format、 LangID、 CalendarID)
expressionApplication オブジェクトを 表す変数。
パラメーター
名前 | 必須 / オプション | データ型 | 説明 |
---|---|---|---|
StringOrNumber | 必須 | バリアント型 | 書式設定される文字列または数値です。文字列、浮動小数点数値、または整数として渡すことができます。 |
UnitsIn | 必須 | バリアント型 | StringOrNumber の属性に対する寸法単位です。 |
UnitsOut | 必須 | バリアント型 | 結果を示す寸法の単位です。 |
Format | 必須 | String | 結果の文字列の外観を表す形式です。 |
LangID | 省略可能 | Long | 結果の文字列に使用する言語です。 |
CalendarID | 省略可能 | Long | 結果の文字列に使用するカレンダーです。 既定値は西暦の visCalWestern です。 |
戻り値
文字列
注釈
StringOrNumber を文字列として渡す場合、この引数には、セルの数式またはセルで使用する予定の数式、あるいは文字列として表されたセルの結果またはこのセルで使用する予定の結果を指定します。 FormatResultExメソッドは文字列を評価し、その結果を書式設定します。 文字列は、特定のセルの数式があるコンテキストの外部から評価されるため、文字列にセル参照が含まれている場合、FormatResultEx メソッドはエラーを返します。
StringOrNumber には次のような値を使用できます。
- 1.7
- 3
- "2.5"
- "4.1 cm"
- "12 ft - 17 in + (12 cm / SQRT(7))"
UnitsIn が visDate である場合、StringOrNumber の DATETIME 関数に数値を渡すことができます。 渡す値の整数部分は 1899 年 12 月 30 日以降の日数を表し、小数部は午前 0 時からの 1 日の分数を表す必要があります。 たとえば、38135.50 は 2004 年 5 月 28 日の正午を表します。
引数 UnitsIn および UnitsOut には、"inches"、"inch"、"in."、"i" などの文字列を指定できます。 センチメートル、メートル、マイルなど、Microsoft Visio がサポートしているすべての単位の文字列を使用できます。 VisUnitCodes で Visio タイプ ライブラリによって宣言された任意の単位定数を使用することもできます。 有効な単位の一覧は、[ 測定単位について] にも含まれています。
StringOrNumber が文字列の場合、UnitsIn は評価された結果を解釈する方法を指定し、結果がスカラーの場合にのみ使用されます。 たとえば、式 "4 * 5 cm"
はスカラーではない 20 cm に評価されるため、 UnitsIn は無視されます。 式 "4 * 5"
は 20 に評価されます。これはスカラーであり、指定された UnitsIn を使用して解釈されます。
引数 UnitsOut は、戻り値を表す単位を指定します。 評価される式と同じ単位を使用する場合は、"NOCAST" または visNoCast を渡します。
Format は、FormatResultEx メソッドによって生成される文字列のテンプレートまたは形式を指定する文字列です。 詳細については、「FORMAT 関数」を参照してください。 設定可能な値の一部を次に示します。
#
- 1 桁の数字を出力しますが、先頭または末尾の 0 の場合は出力しません。0
- 先頭または末尾の 0 であっても、1 桁の数字を出力します。.
- 10 進プレースホルダー。,
- 桁区切り記号。"text"
または'text'
- 囲まれたテキストをそのまま出力します。\c
- 文字 c を出力します。
UnitsIn が visDate の場合、Format はカスタム Microsoft Visio expanded-form の日付/時刻形式のいずれかである必要があります。形式は "{{date/time format picture}}" です。 Visio の [データ形式] ダイアログ ボックスの [カスタム書式] ボックスでこれらの書式を表示できます (図形を選択し、[挿入] タブで [フィールド] を選択します。[カテゴリ] ボックスの一覧で [日付/時刻] を選択し、[データ形式] を選択します。
引数 LangID はオプションです。 値を指定しないと、Visio は現在のシステム言語を使用します。 値を渡す場合、 LangID 引数は、異なる言語バージョンをエンコードするために Windows によって使用される標準 ID のいずれかである必要があります。 たとえば、1033 は米国版の言語 ID です。 使用可能な言語 ID の一覧については、「 言語識別子の定数と文字列」を参照してください。
CalendarID 引数は、Visio タイプ ライブラリの VisCellVals で宣言されている次のいずれかの値である必要があります。 既定値は visCalWestern (西暦) です。
定数 | 値 | 説明 |
---|---|---|
visCalWestern | 0 | 西部 |
visCalArabicHijri | 1 | アラビア暦 (ヒジュラ暦) |
visCalHebrew 太陽・月齢 | 2 | ヘブライ太陰暦 |
visCalChineseTaiwan | 3 | 台湾暦 |
visCalJapaneseEmperor | 4 | 和暦 |
visCalThaiBuddhism | 5 | タイ仏暦 |
visCalKoreanDanki | 6 | 韓国檀紀 |
visCalSakaEra | 7 | サカ暦 |
visCalTranslitEnglish | 8 | 英語 (音訳) |
visCalTranslitFrench | 9 | フランス語 (音訳) |
例
次の例では、 FormatResultEx プロパティを使用して、ギリシャ語で日付を書式設定し、図形テキストとして表示する方法を示します。
Public Sub FormatResultEx_Example
Dim vsoShape As Visio.Shape
Dim strDate As String
Set vsoShape = ActivePage.DrawOval (3, 5, 5, 9)
strDate = Application.FormatResultEx (37663.50, visDate, "", "{{dd MMMM yyyy}}", 1032, 0)
vsoShape.Text = strDate
End Sub
サポートとフィードバック
Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。