次の方法で共有


Conversation.GetAlwaysMoveToFolder メソッド (Outlook)

スレッドで受信された新規アイテムを常に移動する先として指定された配信ストア内のフォルダーを示す、 Folder オブジェクトを返します。

構文

GetAlwaysMoveToFolder( _Store_ )

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

パラメーター

名前 必須 / オプション データ型 説明
Store 必須 Store スレッド アイテムの移動先フォルダーが存在するストアです。

戻り値

移動先となる会話で受信されたすべての新しいアイテムは、常に指定されたストア内の Folder オブジェクト。

注釈

Store パラメーターがアーカイブの .pst ストアなど配信先以外のストアを示している場合、GetAlwaysMoveToFolder メソッドは、既定の配信ストアにあるスレッド アイテムに適用される Folder オブジェクトを返します。

常に会話アイテムを移動するために 削除済みアイテム フォルダー以外のフォルダーが指定されていない場合、 GetAlwaysMoveToFolder メソッドは Null (Visual Basic では Nothing ) を返します。

アプリケーション (VBA) の例を次の Microsoft Visual Basic では、移動先となる最初のメール アイテムを閲覧ウィンドウに表示されるの会話に到着した新しいアイテムは、常にフォルダーを検索する方法を示します。 コード例では、 DemoGetAlwaysMoveToFolder選択したメール アイテムのストアで会話が有効になっていることを確認し、会話が存在する場合はそのメール アイテムの会話オブジェクトを取得し、 GetAlwaysMoveToFolder を 使用してフォルダーを取得し、フォルダー名を表示します。

Sub DemoGetAlwaysMoveToFolder() 
 
 Dim oMail As Outlook.MailItem 
 
 Dim oConv As Outlook.Conversation 
 
 Dim oStore As Outlook.Store 
 
 
 
 ' Get Item displayed in 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 
 
 Dim oFolder As Outlook.folder 
 
 Set oFolder = _ 
 
 oConv.GetAlwaysMoveToFolder(oStore) 
 
 If Not (oFolder Is Nothing) Then 
 
 Debug.Print "MoveToFolder: " & oFolder.name 
 
 Else 
 
 Debug.Print "MoveToFolder action not set" 
 
 End If 
 
 End If 
 
 End If 
 
End Sub

関連項目

会話オブジェクト

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

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