Propriedade View.SaveOption (Outlook)
Retorna uma constante OlViewSaveOption que especifica as pastas nas quais o modo de exibição especificado está disponível e as permissões de leitura anexadas ao modo de exibição. Somente leitura.
Sintaxe
expression. SaveOption
Expressão Uma variável que representa um objeto View .
Comentários
Propriedade SaveOption é definida quando o objeto de modo de exibição é criado usando o método Views.
Exemplo
O exemplo do Microsoft Visual Basic for Applications (VBA) a seguir exibe os nomes de todas as exibições que podem ser acessadas por todos os usuários na pasta Anotações.
O exemplo a seguir bloqueia a interface do usuário para todas as exibições que estão disponíveis para todos os usuários. A sub-rotina LockView aceita o objeto View e um valor booliano que indica se a interface Exibir será bloqueada. Neste exemplo o procedimento sempre é chamado com o valor booliano definido como 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
Confira também
Suporte e comentários
Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.