次の方法で共有


Conversation.SetAlwaysDelete メソッド (Outlook)

指定した配信ストアについて、スレッドで受信されたすべての既存アイテムおよび今後受信されるすべての新規アイテムを、指定した配信ストアの [削除済みアイテム] フォルダーに常に移動するかどうかを示す設定を指定します。

構文

expression. SetAlwaysDelete( _AlwaysDelete_ , _Store_ )

'Conversation' オブジェクトを表す変数。

パラメーター

名前 必須 / オプション データ型 説明
AlwaysDelete 必須 OlAlwaysDeleteConversation 会話に到着するすべての既存のアイテムと新しいアイテムが常に Store パラメーターで 指定されたストアの削除済みフォルダーに移動されるかどうかを示す定数。
Store 必須 Store スレッドの既存アイテムおよび新規アイテムの移動先となる [削除済みアイテム] フォルダーが存在するストアを指定します。

注釈

SetAlwaysDelete メソッドは、Store パラメーターで指定された配信ストアにあるスレッド アイテムを処理します。 Store パラメーターがアーカイブの .pst ストアなど配信先以外のストアを示している場合、そのアクションは既定の配信ストアにあるスレッド アイテムに対して実行されます。

AlwaysDelete パラメーターが olAlwaysDelete の場合、会話アイテムは指定したストアの [削除済みアイテム] フォルダーに移動されます。 この例では、項目完全に削除されません、ユーザーがMicrosoft Outlookをシャット ダウンすると、アイテムを削除する別のオプションを指定しない限り。

SetAlwaysDelete では、 olDoNotDelete が返された場合、会話の既存の項目との会話で受信された新しいアイテムは、指定した配信ストアの削除済みアイテム フォルダーに移動されないと、削除済みアイテム フォルダー内の既存の会話アイテムが受信トレイに移動されます。

次の Visual Basic for Applications (VBA) の例では、特定のメール アイテムの会話を常に削除の設定を設定する方法を示します。 コード例では、 DemoSetAlwaysDelete閲覧ウィンドウに表示される最初のメール アイテムを特定のメール アイテムとして選択します。 DemoSetAlwaysDeleteは、会話がメール アイテムのストアで有効になって、会話が存在し、 SetAlwaysDelete を使用して、常にその会話の既存および新規の項目を同じストア内の削除済みアイテム フォルダーに移動する場合にそのメール アイテムを含む会話を取得することを確認します。

Sub DemoSetAlwaysDelete() 
 Dim oMail As Outlook.MailItem 
 Dim oConv As Outlook.Conversation 
 Dim oStore As Outlook.Store 
 
 ' Get the item displayed in the Reading Pane. 
 Set oMail = ActiveExplorer.Selection(1) 
 Set oStore = oMail.Parent.Store 
 If oStore.IsConversationEnabled Then 
 Set oConv = oMail.GetConversation 
 If Not (oConv Is Nothing) Then 
 oConv.SetAlwaysDelete _ 
 olAlwaysDelete, oStore 
 End If 
 End If 
End Sub

関連項目

会話オブジェクト

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。