次の方法で共有


Application.CreateItemFromTemplate メソッド (Outlook)

Outlook テンプレート (.oft) から新しい Microsoft Outlook アイテムを作成し、そのアイテムを返します。

構文

expression. CreateItemFromTemplate( _TemplatePath_ , _InFolder_ )

Application オブジェクトを表す変数。

パラメーター

名前 必須 / オプション データ型 説明
TemplatePath 必須 文字列型 (String) 新しいアイテムの作成に使用する Outlook テンプレートのパスとファイル名を指定します。
InFolder 省略可能 バリアント型 (Variant) アイテムを作成するフォルダーを指定します。 この引数を省略すると、アイテムの標準のフォルダーにアイテムが作成されます。

戻り値

新しい Outlook アイテムを表す Object 値です。

注釈

新しいアイテムは、読み取りモードでは開かれません。そのアイテムがディスクに保存されたときのモードに関係なく、常に作成モードで開かれます。

このVisual Basic for Applications (VBA) の例では、CreateItemFromTemplate を使用して Outlook テンプレートから新しいアイテムを作成し、表示します。 その下の CreateTemplate マクロは、最初の例で使用されているテンプレートを作成します。 エラーが発生しないよう、"Dan Wilson" をアドレス帳にある実際の名前に置き換えてください。

Sub CreateFromTemplate() 
 Dim MyItem As Outlook.MailItem 
 
 Set MyItem = Application.CreateItemFromTemplate("C:\statusrep.oft") 
 MyItem.Display 
End Sub 
 
Sub CreateTemplate() 
 Dim MyItem As Outlook.MailItem 
 
 Set MyItem = Application.CreateItem(olMailItem) 
 MyItem.Subject = "Status Report" 
 MyItem.To = "Dan Wilson" 
 MyItem.Display 
 MyItem.SaveAs "C:\statusrep.oft", OlSaveAsType.olTemplate 
End Sub

次のVisual Basic for Applications (VBA) の例は、CreateItemFromTemplate メソッドを呼び出すときに省略可能な InFolder パラメーターを使用する方法を示しています。

Sub CreateFromTemplate2() 
 Dim MyItem As Outlook.MailItem 
 
 Set MyItem = Application.CreateItemFromTemplate("C:\statusrep.oft", _ 
 Application.Session.GetDefaultFolder(olFolderDrafts)) 
 MyItem.Save 
End Sub

関連項目

Application オブジェクト

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。