Outlookサポートナビ! ≫≫≫ Outlookフォーム作成/VBSプログラミング
オブジェクト
メソッド
NameSpace
GetDefaultFolder(フォルダの種類)
記述法: Set 変数 = NameSpace.GetDefaultFolder(フォルダの種類)
★既定のフォルダをFolderオブジェクトとして取得できます。
★既定のフォルダとはOutlookで自動的に生成されるフォルダ(受信トレイや下書きなど)です。
★フォルダの種類は値や定数で指定します。(参照:既定のフォルダ(OlDefaultFolders)定数/値 一覧)
記述例:
Set MyNameSpace = Application.GetNameSpace("mapi") Set MyInbox = MyNameSpace.GetDefaultFolder(6) Set Application.ActiveExplorer.CurrentFolder = MyInbox ★Outlookルートオブジェクトを取得 ★受信トレイを取得 ★受信トレイを選択
Set MyNameSpace = Application.GetNameSpace("mapi")
Set MyInbox = MyNameSpace.GetDefaultFolder(6)
Set Application.ActiveExplorer.CurrentFolder = MyInbox
★Outlookルートオブジェクトを取得
★受信トレイを取得
★受信トレイを選択
Set MyNameSpace = Application.GetNameSpace("mapi") Set MyDraftBox = MyNameSpace.GetDefaultFolder(16) Set NewItem = Application.CreateItem(0) NewItem.subject = "本日の会議" NewItem.move MyDraftBox ★Outlookルートオブジェクトを取得 ★下書きフォルダを取得 ★新規メッセージを作成 ★新規メッセージの件名を指定 ★下書きフォルダに保存 ※関連:特定のフォルダに移動する (Item.Moveメソッド)
Set MyNameSpace = Application.GetNameSpace("mapi") Set MyDraftBox = MyNameSpace.GetDefaultFolder(16) Set NewItem = Application.CreateItem(0) NewItem.subject = "本日の会議" NewItem.move MyDraftBox
★下書きフォルダを取得
★新規メッセージを作成
★新規メッセージの件名を指定
★下書きフォルダに保存
※関連:特定のフォルダに移動する (Item.Moveメソッド)