Conversation.SetAlwaysAssignCategories メソッド (Outlook)
スレッドの既存のアイテムおよび今後受信されるアイテムすべてに分類項目を割り当てます。
構文
expression. SetAlwaysAssignCategories
( _Categories_
, _Store_
)
式 'Conversation' オブジェクトを表す変数。
パラメーター
名前 | 必須 / オプション | データ型 | 説明 |
---|---|---|---|
Categories | 必須 | 文字列型 | スレッドのすべてのアイテムに常に割り当てる分類項目名の文字列。分類項目名が複数の場合は、カンマで区切ります。 |
Store | 必須 | Store | 会話の項目に常に Categories パラメーターで指定されたカテゴリを割り当てるストア。 |
注釈
Store パラメーターで指定されたストアがアーカイブ .pst ストアなどの配信不能ストアを表す場合、メソッドは既定の配信ストア内の会話アイテムに適用されるカテゴリの文字列を返します。
ItemChange オブジェクトのイベントの アイテム は、会話で、 SetAlwaysAssignCategories メソッドを呼び出したときに発生します。
現在のユーザーの既存のマスター カテゴリを確認するには、Store パラメーターで指定されている Store オブジェクトの Categories プロパティを調べます。 Categories パラメーターで指定された 1 つ以上のカテゴリがマスター カテゴリ コレクションに存在しない場合、カテゴリは会話に割り当てられますが、マスター カテゴリ コレクションには追加されません。
指定したストア内のスレッドのアイテムに常に割り当てる既存の分類項目を特定するには、 GetAlwaysAssignCategories メソッドを使用します。
SetAlwaysAssignCategories を 2 回以上呼び出す場合、結果は累積になります。 たとえば、カテゴリ "重要" を指定して SetAlwaysAssignCategories を呼び出し、カテゴリ "Business" と "Social" を指定して SetAlwaysAssignCategories をもう一度呼び出した場合、常に割り当てられるカテゴリは "重要"、"Business"、"Social" です。
常にカテゴリを割り当てることの操作を停止するには、 ClearAlwaysAssignCategories メソッドを使用します。 ClearAlwaysAssignCategories メソッドが呼び出されると、 GetAlwaysAssignCategories は空の文字列を返します。
SetAlwaysAssignToCategories メソッドは、空の文字列は、任意のカテゴリ名を無視します。 たとえば、Categories パラメーターに "Work,,Play" という文字列を設定した場合、"Work" および "Play" がスレッドに割り当てられ、空の文字列の分類項目は無視されます。
例
次の Visual Basic for Applications (VBA) の例は、特定のメール アイテムの会話に到着したすべての既存および新規のアイテムをカテゴリに割り当てる方法を示しています。 コード例では、 DemoSetAlwaysAssignCategories
閲覧ウィンドウに表示される最初のメール アイテムを特定のメール アイテムとして選択します。 DemoSetAlwaysAssignCategories
は、会話が選択されているメール アイテムのストアで有効になって、会話が存在し、ベスト プラクティス」および「OOM」の 2 つのカテゴリを設定するのには SetAlwaysAssignToCategories を使用して、すべて既存の項目とその会話の後の項目には、メール アイテム会話オブジェクトを取得することをを確認します。
Sub DemoSetAlwaysAssignCategories()
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
Dim oFolder As Outlook.folder
oConv.SetAlwaysAssignCategories "Best Practices; OOM", oStore
End If
End If
End Sub
関連項目
サポートとフィードバック
Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。