Метод View.Apply (Outlook)

Применяет представление к пользовательскому интерфейсу Microsoft Outlook.

Синтаксис

expression. Применить

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

Замечания

Чтобы правильно сбросить текущее представление, необходимо выполнить view.Reset , а затем View.Apply. В приведенном ниже примере кода показан порядок вызовов:

Sub ResetView() 
 
 Dim v as Outlook.View 
 
 ' Save a reference to the current view object 
 
 Set v = Application.ActiveExplorer.CurrentView 
 
 ' Reset and then apply the current view 
 
 v.Reset 
 
 v.Apply 
 
End Sub

Пример

В следующем примере Visual Basic для приложений (VBA) создается новое представление с именем "Новая таблица" и применяется.

Sub CreateView() 
 
 'Creates a new view 
 
 Dim objName As Outlook.NameSpace 
 
 Dim objViews As Outlook.Views 
 
 Dim objNewView As Outlook.View 
 
 
 
 Set objName = Application.GetNamespace("MAPI") 
 
 Set objViews = objName.GetDefaultFolder(olFolderInbox).Views 
 
 Set objNewView = objViews.Add(Name:="New Table", _ 
 
 ViewType:=olTableView) 
 
 objNewView.Save 
 
 objNewView.Apply 
 
End Sub

См. также

Отобразить объект

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

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