Propiedad View.SaveOption (Outlook)
Devuelve una constante OlViewSaveOption que especifica las carpetas en la que está disponible la vista especificada y los permisos de lectura adjuntos a la vista. Solo lectura.
Sintaxis
expresión. SaveOption
Expresión Variable que representa un objeto View .
Comentarios
La propiedad SaveOption se establece cuando se crea el objeto View mediante el método Views.Add.
Ejemplo:
En el ejemplo siguiente de Microsoft Visual Basic para Aplicaciones (VBA), se muestran los nombres de todas las vistas accesibles por todos los usuarios en la carpeta Notes (Notas).
En el siguiente ejemplo se bloquea la interfaz de usuario para todas las vistas que están disponibles para todos los usuarios. La subrutina LockView
acepta el objeto View y un valor booleano que indica si se bloqueará la interfaz View. En este ejemplo el procedimiento se llama siempre con el valor Boolean establecido en 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
Consulte también
Soporte técnico y comentarios
¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.