View.LockUserChanges-Eigenschaft (Outlook)

Gibt zurück oder legt einen booleschen Wert, der angibt, ob ein Benutzer die Einstellungen der aktuellen Ansicht ändern kann. Lese-/Schreibzugriff.

Syntax

Ausdruck. LockUserChanges

Ausdruck Eine Variable, die ein View-Objekt darstellt.

HinwBemerkungeneise

Wenn True, der Benutzer die Einstellungen der aktuellen Ansicht ändern kann. Änderungen an der Benutzeroberfläche werden jedoch nicht gespeichert werden. Wenn False (Standard), alle Änderungen gespeichert werden.

Beispiel

Im folgenden Beispiel wird die Benutzeroberfläche für alle Ansichten, die für alle Benutzer verfügbar sind gesperrt. Die Unterroutine LockView akzeptiert das View-Objekt und einen booleschen Wert, der angibt, ob die View-Schnittstelle gesperrt wird. In diesem Beispiel wird die Prozedur immer mit den booleschen Wert auf True festgelegt aufgerufen.

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

Siehe auch

View-Objekt

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.