View.Reset 方法 (Outlook)

将内置的 Microsoft Outlook 视图重置为原始设置。

语法

expression。 Reset

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

备注

此方法仅应用于内置 Outlook 视图。

要正确地重置当前视图，您必须执行 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) 示例下面的 Microsoft Visual Basic for Applications 将在用户的 收件箱中所有内置视图重置为其原始设置。 返回 标准 的属性以确定该视图是否内置的 Outlook 视图。

Sub ResetViews() 
 
 'Resets all standard views in the user's Inbox 
 
 
 
 Dim objName As Outlook.NameSpace 
 
 Dim objViews As Outlook.Views 
 
 Dim objView As Outlook.View 
 
 
 
 Set objName = Application.GetNamespace("MAPI") 
 
 Set objViews = objName.GetDefaultFolder(olFolderInbox).Views 
 
 For Each objView In objViews 
 
 If objView.Standard = True Then 
 
 objView.Reset 
 
 End If 
 
 Next objView 
 
End Sub

另请参阅

视图对象

支持和反馈

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