TimelineView.LockUserChanges-Eigenschaft (Outlook)
Gibt zurück oder legt einen booleschen Wert, der angibt, ob ein Benutzer die Einstellungen der Ansicht ändern kann. Lese-/Schreibzugriff.
Syntax
Ausdruck. LockUserChanges
Ausdruck Eine Variable, die ein TimelineView-Objekt darstellt.
Hinweise
Wenn True, der Benutzer die Einstellungen der angegebenen Ansicht ändern kann. Änderungen an der Benutzeroberfläche werden jedoch nicht gespeichert werden. Wenn False (Standard), alle Änderungen gespeichert werden.
Beispiel
Im folgende Visual Basic für Applikationen (VBA) sperrt die Benutzeroberfläche für alle Ansichten, die für alle Benutzer verfügbar sind. Die Unterroutine LockView akzeptiert das View-Objekt und einen booleschen Wert, der angibt, ob die View-Benutzeroberfläche gesperrt wird. In diesem Beispiel wird die Prozedur immer mit den booleschen Wert auf True festgelegt aufgerufen.
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
Siehe auch
Support und Feedback
Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.