【Word VBA】グローバル メンバー (Word)のHelpを実行した結果サンプル

Globalオブジェクトの勉強のためのコードです。

Word VBAのオブジェクトブラウザで確認できる WdHelpType 列挙型（Word.Help メソッド）をループ実行し、それぞれの定数を指定して実行した挙動の検証サンプルです。

WdHelpType 列挙型一覧

サンプルコード（ループ実行による挙動確認）

オブジェクトブラウザで確認できる定数の範囲をループさせ、Word.Help メソッドを呼び出す実験コードです。

Sub Word_Helpの実行()
    On Error GoTo ERROR
     
    Dim StartType As Word.WdHelpType
    Dim EndType As Word.WdHelpType
    Dim T As Word.WdHelpType
     
    StartType = wdHelp
    EndType = wdHelpUsingHelp
        
    For T = StartType To EndType
        Debug.Print "定数 Word.WdHelpType=" & T & " 開始"
        Word.Help T
    Next T
     
    Exit Sub
ERROR:
    Debug.Print "定数 Word.WdHelpType=" & T & " エラー発生"
    Resume Next
End Sub

実行結果メモ

定数 Word.WdHelpType=0 開始    なにもおこらず
定数 Word.WdHelpType=1 開始    MicroSoft Wordのバージョン情報 ダイアログ表示（wdHelpAbout）
定数 Word.WdHelpType=2 開始    なにもおこらず
定数 Word.WdHelpType=3 開始    なにもおこらず
定数 Word.WdHelpType=4 開始
定数 Word.WdHelpType=4 エラー発生
定数 Word.WdHelpType=5 開始    なにもおこらず
定数 Word.WdHelpType=6 開始    なにもおこらず
定数 Word.WdHelpType=7 開始    カスタマーサポートアンドサービス ダイアログ表示（wdHelpPSSHelp）
定数 Word.WdHelpType=8 開始
定数 Word.WdHelpType=8 エラー発生
定数 Word.WdHelpType=9 開始    なにもおこらず
定数 Word.WdHelpType=10 開始   なにもおこらず

動作する定数のみを指定した実行例

検証結果を踏まえ、ダイアログ表示等の動作が確認できた定数のみを指定して実行するコードです。

Sub WordHelpの実行2()
    Word.Help Word.WdHelpType.wdHelpAbout
    Word.Help Word.WdHelpType.wdHelpPSSHelp
End Sub