使用可能なすべてのテンプレートを表す Templates コレクションを取得、グローバル テンプレートとは、開いているドキュメントに接続されています。
構文
式。 Templates
expression 必須です。 'Global' オブジェクトを表す変数。
解説
コレクションの 1 つのメンバーを返す方法については、「コレクション からオブジェクトを返す」を参照してください。
例
次の使用例は、 Templates コレクションの各テンプレートの名前を表示します。
Count = 1
For Each aTemplate In Templates
MsgBox aTemplate.Name & " is template number " & Count
Count = Count + 1
Next aTemplate
次の使用例は、1 つ目のテンプレートが全文書対象のテンプレートである場合、そのパスを thePath に格納します。 ChDir ステートメントを使用して、thePath に格納されているパスが示すフォルダーを現在のフォルダーに変更します。 この変更を加えた場合、[ 開く] ダイアログ ボックスが表示されます。
If Templates(1).Type = wdGlobalTemplate Then
thePath = Templates(1).Path
If thePath <> "" Then ChDir thePath
Dialogs(wdDialogFileOpen).Show
End If
関連項目
サポートとフィードバック
Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。