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

 

◆ Foldersコレクション.Itemメソッド


オブジェクト

メソッド

Foldersコレクション

Item(インデックス番号)

記述法:Set 変数 = Folders.Item(インデックス番号)

 

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

インデックス番号の1〜最大値を使うことにより、全てのサブフォルダに対し一括処理を行うことができます。

 

 

記述例:


記号

受信トレイ配下の全てのサブフォルダを削除する

Set MyNameSpace = Application.GetNameSpace("mapi")

Set MyInbox = MyNameSpace.GetDefaultFolder(6)

intX = MyInbox.Folders.Count

 

For i = intX to 1 Step -1

MyInbox.Folders.Item(i).delete

Next

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

★受信トレイを取得

★受信トレイのFoldersコレクション内の数(サブフォルダ)を取得

 

★受信トレイのFoldersコレクション内のフォルダをインデックス番号(最大値→1まで)で指定し削除する

 

※Folder.Folders(インデックス番号)でも同様の処理を行うことができます。

参考: 全てのサブフォルダを削除する

 

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