このブラウザーはサポートされなくなりました。

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