Свойство TableView.SaveOption (Outlook)
Возвращает константу OlViewSaveOption , указывающую папки, в которых доступно указанное представление, и разрешения на чтение, присоединенные к представлению. Только для чтения.
Синтаксис
выражение. SaveOption
Выражение Переменная, представляющая объект TableView .
Замечания
Значение свойства SaveOption задается при создании объекта TableView с помощью метода Add коллекции Views .
Пример
В следующем примере Visual Basic для приложений (VBA) пользовательский интерфейс блокируется для всех представлений, доступных всем пользователям. Подпрограмма LockView принимает объект View и логическое значение, указывающее, будет ли заблокирован пользовательский интерфейс View . В этом примере процедура всегда вызывается с логическим значением True.
Sub LockPublicViews()
Dim objName As NameSpace
Dim objViews As Views
Dim objView As View
' Get the Views collection for the Contacts default folder.
Set objName = Application.GetNamespace("MAPI")
Set objViews = objName.GetDefaultFolder(olFolderContacts).Views
' Enumerate the Views collection and lock the user
' interface for any view that can be accessed by
' all users who have access to the Notes default folder.
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)
' Examine the view object.
With objView
If blnAns = True Then
' Lock the user interface and
' save the view
.LockUserChanges = True
.Save
Else
' Unlock the user interface of the view.
.LockUserChanges = False
End If
End With
End Sub
См. также
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.