Свойство Folder.CurrentView (Outlook)
Возвращает объект View, представляющий текущее представление. Только для чтения.
Синтаксис
выражение. CurrentView
Выражение Переменная, представляющая объект Folder .
Замечания
Чтобы получить объект 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
Пример
В следующем примере VBA отображается текущее представление папки "Входящие".
Sub TestFolderCurrentView()
Dim nsp As Outlook.NameSpace
Dim mpFolder As Outlook.Folder
Dim vw As Outlook.View
Dim strView As String
Set nsp = Application.Session
Set mpFolder = nsp.GetDefaultFolder(olFolderInbox)
' Save a reference to the current view
Set vw = mpFolder.CurrentView
MsgBox "The Current View is: " & vw.Name
End Sub
См. также
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.