Selectionコレクションは
エクスプローラーで現在選択されているアイテムの集合です。ExplorerオブジェクトのSelectionプロパティで取得できます。
Selectionコレクションを使って、現在選択されているアイテムに対し一括処理を行うことができます。
例: Set
Selectionコレクション変数
= Explorer.Selection |
主なプロパティ |
主なメソッド |
Count …
選択しているアイテム数を取得します。 |
Item(#) …
Selectionコレクションからアイテムを取得します。 |
記述例:
|
現在選択しているアイテムを削除する
|
Set
MyExplorer = Application.ActiveExplorer
intX = MyExplorer.Selection.Count
For i = intX to 1 Step -1
MyExplorer.Selection.item(i).delete
Next |
★現在表示しているExplorerオブジェクトを取得
★現在選択しているアイテムの数を取得
★選択アイテムをインデックス番号で指定して削除
(最大値→
1までのアイテムを削除)
|
※Selectionコレクション内のItemのインデックス番号はアイテム数に応じて順に付けられるため、インデックス番号1を削除するとこれまでのインデックス番号2→1に繰り上がります。そのため、昇順に削除すると全削除できなくなるので、
降順で削除します。
≫≫ Outlookフォーム作成/開発/VBSプログラミング
≫≫
Outlookオブジェクトモデルから学ぶ
|