このブラウザーはサポートされなくなりました。
Microsoft Edge にアップグレードすると、最新の機能、セキュリティ更新プログラム、およびテクニカル サポートを利用できます。
Microsoft Edge をダウンロードする
Internet Explorer と Microsoft Edge の詳細情報
名前空間の分類項目マスターを定義する
Category
オブジェクトのコレクションを表します。
Microsoft Outlookは、Outlook アイテムに簡単に識別してユーザー定義のカテゴリにグループ化、分類システムを提供します。
Categories
オブジェクトは、特定のメールボックスのユーザーに利用可能なユーザー定義のカテゴリのセットを表します。
カテゴリ
オブジェクトのプロパティの
名前空間
を使用すると、その名前空間の分類項目マスターを表す
カテゴリ
のオブジェクト参照を取得します。
Add
メソッドを使用して新しい
Category
オブジェクトを作成し、それをコレクションに追加します。
Item
メソッドを使用して、既存の
カテゴリの Category
オブジェクト参照を取得し、
Remove
メソッドを使用してコレクションから
Category
オブジェクトを削除します。
Count
プロパティを使用して、コレクションに含まれるカテゴリの数を返します。
次のVisual Basic for Applications (VBA) の例では、既定の
NameSpace
オブジェクトに関連付けられている
Categories
コレクションに含まれる各
Category
オブジェクトの名前と識別子を含むダイアログ ボックスを表示します。
Private Sub ListCategoryIDs()
Dim objNameSpace As NameSpace
Dim objCategory As Category
Dim strOutput As String
' Obtain a NameSpace object reference.
Set objNameSpace = Application.GetNamespace("MAPI")
' Check if the Categories collection for the Namespace
' contains one or more Category objects.
If objNameSpace.Categories.Count > 0 Then
' Enumerate the Categories collection.
For Each objCategory In objNameSpace.Categories
' Add the name and ID of the Category object to
' the output string.
strOutput = strOutput & objCategory.Name & _
": " & objCategory.CategoryID & vbCrLf
End If
' Display the output string.
MsgBox strOutput
' Clean up.
Set objCategory = Nothing
Set objNameSpace = Nothing
End Sub