Propiedad CalendarView.LockUserChanges (Outlook)
Devuelve o establece un valor booleano que indica si un usuario puede modificar la configuración de la vista. Lectura y escritura.
Sintaxis
expresión. LockUserChanges
Expresión Variable que representa un objeto CalendarView .
Comentarios
Si el es True, el usuario puede modificar la configuración de la vista especificada. Sin embargo, no se guardarán los cambios realizados en la interfaz. Si False (valor predeterminado), los cambios se guardarán.
Ejemplo:
El ejemplo siguiente Visual Basic para aplicaciones (VBA) 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 de usuario de View . En este ejemplo el procedimiento se llama siempre con el valor Boolean establecido en 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
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.