Outlookサポートナビ！  ≫≫≫ Outlookフォーム作成／VBSプログラミング

　

◆ Foldersコレクション

　

特定のフォルダに含まれる全てのサブフォルダを表す集合です。FolderオブジェクトのFoldersプロパティで取得することができます。

　

例： Set Foldersコレクション変数 = Folder.Folders

★ 特定のサブフォルダを取得するには、Set 変数 = Folder.Folders("フォルダ名") を使います。

　

主なメソッド

Add … FoldersコレクションにFolderを追加します。（サブフォルダの作成）

Item … FoldersコレクションからFolderオブジェクトを取得します。

　

　

記述例：

記号

受信トレイ配下に新規フォルダを作成する

Set MyNameSpace = Application.GetNameSpace("mapi")

Set MyInbox = MyNameSpace.GetDefaultFolder(6)

Set FoldersCol = MyInbox.Folders

Set NewFolder = FoldersCol.Add ("NEW")

★Outlookルートオブジェクトを取得

★受信トレイを取得

★受信トレイのFoldersコレクション取得

★受信トレイ配下に「NEW」というフォルダを作成
記号

受信トレイ配下の「学校」フォルダを取得する

Set MyNameSpace = Application.GetNameSpace("mapi")

Set MyInbox = MyNameSpace.GetDefaultFolder(6)

Set School = MyInbox.Folders("学校")

★Outlookルートオブジェクトを取得

★受信トレイを取得

★学校フォルダを取得（オブジェクト変数School)

　

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