Свойство Explorer.CurrentView (Outlook)

Статья
04/07/2023

Возвращает или задает значение Variant , представляющее текущее представление. Для чтения и записи.

Синтаксис

выражение. CurrentView

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

Замечания

Чтобы получить объект View для представления текущего обозревателя, используйте Explorer.CurrentView вместо свойства CurrentView текущего объекта Folder , возвращенного Explorer.CurrentFolder.

Необходимо сохранить ссылку на объект View, возвращенный CurrentView , прежде чем использовать его для каких-либо целей.

Чтобы правильно сбросить текущее представление, необходимо выполнить 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

Если это свойство задано, происходят два события: BeforeViewSwitch происходит до фактического изменения представления и может использоваться для отмены изменения, а ViewSwitch — после вступления изменения в силу.

Пример

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

Sub ChangeCurrentView() 
 
 Dim myOlExp As Outlook.Explorer 
 
 
 
 Set myOlExp = Application.ActiveExplorer 
 
 If myOlExp.CurrentFolder = "Inbox" Then 
 
 myOlExp.CurrentView = "Messages" 
 
 End If 
 
End Sub

См. также

Объект Explorer

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

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

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