◆ Item.Displayメソッド

アイテムを表示します。（新しいウィンドウで表示）

記述例：

新規メッセージを作成し表示する

Set NewItem = Application.CreateItem(0) Set NewItem.subject = "問い合わせ" NewItem.Display

★新規メッセージを作成 ★新規メッセージの件名を”問い合わせ”とする ★新規メッセージを 表示する

新規ユーザー設定フォームを表示する (ex.受信トレイ−登録フォルダに発行されたフォーム）

Set MyNameSpace = Application.GetNameSpace("mapi") Set MyInbox = MyNameSpace.GetDefaultFolder(6) Set TorokuFolder = MyInbox.Folders("登録") Set NewForm = TorokuFolder.Items.Add("IPM.Post.Toroku") NewForm.Display

★Outlookルートオブジェクトを取得 ★受信トレイを取得 ★受信トレイ配下の”登録”フォルダを取得 ★登録フォルダに発行されている新規フォームを作成 ★新規フォームを表示

新規予定アイテムを表示する

Set MyNameSpace = Application.GetNameSpace("mapi") Set MyCalendar = MyNameSpace.GetDefaultFolder(9) Set NewItem = MyCalendar.Items.Add NewItem.Display

★Outlookルートオブジェクトを取得 ★予定表フォルダを取得 ★新規予定アイテム作成 ★新規予定アイテムを表示

　

※Set NewItem = Application.CreateItem(1) でも新規予定アイテムを作成できます。

≫≫  Outlookフォーム作成／開発／VBSプログラミング  ≫≫ Outlookオブジェクトモデルから学ぶ