通过

Explorer.CurrentView 属性 (Outlook)

  • 项目

返回或设置一个 variant 类型的值 表示的当前视图。 读/写。

语法

expression。 CurrentView

表达 一个代表 Explorer 对象的变量。

备注

若要获取当前的 资源管理器中 的视图的 视图 对象，使用 Explorer.CurrentView ，而不是当前 文件夹 对象返回的 Explorer.CurrentFolder 的 CurrentView 属性。

您必须保存返回 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 for Applications (VBA) 示例将活动浏览器中的当前视图设置为邮件（如果显示“收件箱”）。

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

另请参阅

资源管理器对象

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。