Conversation.SetAlwaysMoveToFolder メソッド (Outlook)
スレッドで受信されたすべての既存アイテムおよび新規アイテムを常に移動する先のフォルダーを示す Folder オブジェクトを設定します。
構文
expression. SetAlwaysMoveToFolder
( _MoveToFolder_
, _Store_
)
式 'Conversation' オブジェクトを表す変数。
パラメーター
名前 | 必須 / オプション | データ型 | 説明 |
---|---|---|---|
MoveToFolder | 必須 | Folder | スレッドで受信されたすべての既存アイテムおよび新規アイテムを常に移動する先のフォルダーを指定します。 |
Store | 必須 | Store | スレッド アイテムの移動先フォルダーが存在するストアを指定します。 |
注釈
SetAlwaysMoveToFolder メソッドは、Store パラメーターで指定された配信ストアにあるスレッド アイテムを処理します。 Store パラメーターがアーカイブの .pst ストアなど配信先以外のストアを示している場合、既定の配信ストアにあるスレッド アイテムに対して移動アクションが実行されます。
存在しないフォルダー、移動済みフォルダー、読み取り専用フォルダーなど、無効なフォルダーを MoveToFolder パラメーターに指定した場合、Outlook でエラーが発生します。
ストア内のスレッド アイテムを常にフォルダーに移動するアクションを停止するには、 StopAlwaysMoveToFolder メソッドを呼び出します。
注:
SetAlwaysMoveToFolder で削除済みアイテム フォルダーを MoveToFolder パラメーターとして設定することは、同じストアと会話で SetAlwaysDelete を呼び出すことと同じではありません。 OlDoNotDelete の値を返す GetAlwaysDelete メソッドで削除済みアイテム フォルダーに、 MoveToFolderパラメーターを設定しています。
Folder オブジェクトの BeforeItemMove イベントは、SetAlwaysMoveToFolder を呼び出すと発生します。
例
次の Visual Basic for Applications (VBA) の例では、会話の既存の項目と、特定のメール アイテムの会話に到着した新しいアイテムは、常に移動先フォルダーを設定する方法を示します。 コード例では、 DemoSetAlwaysMoveToFolder
閲覧ウィンドウに表示される最初のメール アイテムを特定のメール アイテムとして選択し、受信トレイ フォルダーの下にある "1-Reference" という名前のフォルダーを、会話アイテムを移動するフォルダーとして選択します。 DemoSetAlwaysMoveToFolder
は、会話が選択されているメール アイテムのストアで有効になって、会話が存在し、 SetAlwaysMoveToFolder を使用して、常にすべての会話の既存のアイテムと指定したフォルダーに、会話で受信された新しいアイテムを移動する場合は、メール アイテムの会話のオブジェクトを取得するを確認します。
Sub DemoSetAlwaysMoveToFolder()
Dim oMail As Outlook.MailItem
Dim oConv As Outlook.Conversation
Dim oStore As Outlook.Store
Dim oFolder As Outlook.Folder
' Obtain a reference to the folder where conversation items will be moved.
Set oFolder = _
Application.Session.GetDefaultFolder(olFolderInbox).Folders("1-Reference")
' Get the Item displayed in the Reading Pane.
Set oMail = ActiveExplorer.Selection(1)
Set oStore = oFolder.Store
If oStore.IsConversationEnabled Then
Set oConv = oMail.GetConversation
If Not (oConv Is Nothing) Then
oConv.SetAlwaysMoveToFolder oFolder, oStore
End If
End If
End Sub
関連項目
サポートとフィードバック
Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。