Outlook) (View.SaveOption 属性

返回一个 OlViewSaveOption 常量，用于指定在其中指定的视图是可用的文件夹和视图的读取的权限。 只读。

语法

expression。 SaveOption

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

备注

通过使用 Views.Add 方法来创建 视图 对象时设置 SaveOption 属性。

示例

以下 Microsoft Visual Basic for Applications (VBA) 示例显示可以由 "便笺" 文件夹中所有用户访问的所有视图的名称。

以下示例锁定对所有用户可用的全部视图的用户界面。 子例程 LockView 接受 View 对象和一个 布尔 值，该值指示 View 接口是否将被锁定。 在本示例中将设置为 True 的 布尔 值与始终调用的过程。

Sub LocksPublicViews() 
 
 'Locks the interface of all views that are available to 
 
 'all users of this folder. 
 
 Dim objName As Outlook.NameSpace 
 
 Dim objViews As Outlook.Views 
 
 Dim objView As Outlook.View 
 
 
 
 Set objName = Application.GetNamespace("MAPI") 
 
 Set objViews = objName.GetDefaultFolder(olFolderNotes).Views 
 
 For Each objView In objViews 
 
 If objView.SaveOption = olViewSaveOptionThisFolderEveryone Then 
 
 Call LockView(objView, True) 
 
 End If 
 
 Next objView 
 
End Sub 
 
 
 
Sub LockView(ByRef objView As View, ByVal blnAns As Boolean) 
 
 'Locks the user interface of the view. 
 
 'Accepts and returns a View object and user response. 
 
 With objView 
 
 If blnAns = True Then 
 
 'if true lock UI 
 
 .LockUserChanges = True 
 
 .Save 
 
 Else 
 
 'if false don't lock UI 
 
 .LockUserChanges = False 
 
 End If 
 
 End With 
 
End Sub

另请参阅

视图对象

支持和反馈

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