Событие Views.ViewAdd (Outlook)

Статья
04/07/2023

Происходит при добавлении представления в коллекцию. Microsoft Outlook создает новое представление и передает его в это событие.

Синтаксис

выражение. ViewAdd( _View_ )

Выражение Переменная, представляющая объект Views .

Параметры

Имя	Обязательный или необязательный	Тип данных	Описание
Просмотр	Обязательный	View	Новое представление, добавленное в коллекцию до этого события.

Пример

В следующем примере Microsoft Visual Basic для приложений (VBA) отображается имя представления и сохраняется при запуске события ViewAdd. Используйте метод Save после изменения свойств, чтобы сохранить изменения в представлении. Пример кода должен быть помещен в модуль класса, например ThisOutlookSession, и процедура должна быть вызвана AddView() , прежде чем процедура события может быть вызвана Outlook.

Public WithEvents objViews As Outlook.Views 
 
 
 
Sub AddView() 
 
 Dim objView As Outlook.View 
 
 Set objViews = Application.ActiveExplorer.CurrentFolder.Views 
 
 Set objView = objViews.Add("Latest View1", olTableView, olViewSaveOptionAllFoldersOfType) 
 
End Sub 
 
 
 
Sub objViews_ViewAdd(ByVal View As View) 
 
'Displays name of new view 
 
 With View 
 
 Msgbox .Name & " was created programmatically." 
 
 .Save 
 
 End With 
 
End Sub

См. также

Объект Views

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

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

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