Outlook VBA教程:SaveOption属性

返回指定视图可用的文件夹和视图的读取权限。OlViewSaveOption 常量。SaveOption属性在使用Add方法创建 View对象时设置。只读。

OlViewSaveOption 可为下列 OlViewSaveOption 常量之一。
olViewSaveOptionAllFoldersOfType 所有这种类型的文件夹都可以使用此视图。
olViewSaveOptionThisFolderEveryone 所有能访问当前文件夹的用户都可以使用此视图。此视图只与该文件夹关联。
olViewSaveOptionThisFolderOnlyMe 此视图只与当前文件夹关联,只有该用户能够访问此视图。

expression.SaveOption

expression  必选。该表达式返回View对象。

VBA示例

以下示例显示能被“便笺”文件夹中所有用户访问的视图的名称。


Sub DisplayPublicViews()
'Displays the names of all views that are available to
'all users of this folder
    Dim olApp As Outlook.Application
    Dim objName As NameSpace
    Dim objViews As Views
    Dim objView As View
    Dim strSaveOption As String
    Set olApp = Outlook.Application
    Set objName = olApp.GetNamespace("MAPI")
    Set objViews = objName.GetDefaultFolder(olFolderNotes).Views
    For Each objView In objViews
        If objView.SaveOption = olViewSaveOptionThisFolderEveryone Then
            'if list is empty, start list
            If strSaveOption = "" Then
                strSaveOption = "The following views are available" & _
                                " to all users:" & vbCr & vbCr & objView.Name & vbCr
            Else
            'If not empty, add names to list
                strSaveOption = strSaveOption & _
                                objView.Name & vbCr
            End If
        End If
    Next objView
    'If views exist display names
    If strSaveOption <> "" Then
        MsgBox strSaveOption
    End If
End Sub

上页:Outlook VBA教程:Saved属性 下页:Outlook VBA教程:SaveSentMessageFolder属性

Outlook VBA教程:SaveOption属性:相关链接

Outlook VBA教程:SaveSentMessageFolder属性 Outlook VBA教程:SchedulePlusPriority属性
Outlook VBA教程:Scope属性 Outlook VBA教程:ScriptText属性
Outlook VBA教程:SearchSubFolders属性 Outlook VBA教程:SelectedMailingAddress属性
Outlook VBA教程:Selection属性 Outlook VBA教程:SenderName属性
Outlook VBA教程:Sensitivity属性 Outlook VBA教程:Sent属性
Outlook VBA教程:SentOn属性 Outlook VBA教程:SentOnBehalfOfName属性
Outlook VBA教程:Session属性 Outlook VBA教程:Shortcuts属性
Outlook VBA教程:ShowAsOutlookAB属性 Outlook VBA教程:ShowOn属性
Outlook VBA教程:Size属性 Outlook VBA教程:Spouse属性
Outlook VBA教程:Standard属性 Outlook VBA教程:Start属性
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号