Прочитать на английском

Поделиться через


Объект Views (Outlook)

Содержит коллекцию всех объектов View в текущей папке.

Замечания

Используйте свойство Views объекта Folder , чтобы вернуть коллекцию Views . Используйте Представления (индекс), где индекс — это имя или положение объекта в коллекции, чтобы вернуть один объект View .

Используйте метод Add коллекции views, чтобы добавить новое представление в коллекцию.

Используйте метод Remove , чтобы удалить представление из коллекции.

Пример

В следующем примере возвращается объект View типа olTableView с именем Представление таблицы. Перед выполнением этого примера убедитесь, что существует представление с именем "Представление таблицы".

Sub GetView() 
 
 'Returns a view called Table View 
 
 Dim objName As NameSpace 
 
 Dim objViews As Views 
 
 Dim objView As View 
 
 
 
 Set objName = Application.GetNamespace("MAPI") 
 
 Set objViews = objName.GetDefaultFolder(olFolderInbox).Views 
 
 'Return a view called Table View 
 
 Set objView = objViews.Item("Table View") 
 
End Sub

В следующем примере добавляется новое представление типа olIconView в папку "Заметки" пользователя.

Примечание

Метод Add завершится ошибкой, если представление с тем же именем уже существует.

Sub CreateView() 
 
 'Creates a new view 
 
 Dim objName As NameSpace 
 
 Dim objViews As Views 
 
 Dim objNewView As View 
 
 
 
 Set objName = Application.GetNamespace("MAPI") 
 
 Set objViews = objName.GetDefaultFolder(olFolderNotes).Views 
 
 Set objNewView = objViews.Add(Name:="New Icon View Type", _ 
 
 ViewType:=olIconView, SaveOption:=olViewSaveOptionThisFolderEveryone) 
 
 
 
End Sub

В следующем примере из коллекции удаляется приведенное выше представление "Новый тип представления значка".

Sub DeleteView() 
 
 'Deletes a view from the collection 
 
 Dim objName As NameSpace 
 
 Dim objViews As Views 
 
 Dim objNewView As View 
 
 
 
 Set objName = Application.GetNamespace("MAPI") 
 
 Set objViews = objName.GetDefaultFolder(olFolderNotes).Views 
 
 objViews.Remove ("New Icon View Type") 
 
End Sub

События

Методы

Свойства

См. также

Справочник по объектной модели Outlook

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.