Свойство NameSpace.Categories (Outlook)
Возвращает или задает объект Categories , представляющий набор объектов Category , доступных для пространства имен. Для чтения и записи.
Синтаксис
выражение. Categories
Выражение Переменная, представляющая объект NameSpace.
Замечания
Это свойство представляет список основных категорий, который представляет собой набор объектов Category , которые могут применяться к элементам Outlook, содержащимся в объекте NameSpace , и применяется ко всем пользователям этого пространства имен.
Это свойство аналогично свойству Categories объекта Store . Если в текущем профиле определено несколько учетных записей, используйте свойство Categories хранилища, связанного с конкретной учетной записью.
Пример
В следующем примере Visual Basic для приложений (VBA) отображается диалоговое окно, содержащее имена и идентификаторы для каждого объекта Category, содержащегося в коллекции Categories, связанной с объектом NameSpace по умолчанию.
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 whether 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
Next
End If
' Display the output string.
MsgBox strOutput
' Clean up.
Set objCategory = Nothing
Set objNameSpace = Nothing
End Sub
См. также
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.