Partager via


Propriété View.LockUserChanges (Outlook)

Renvoie ou définit une valeur de type Boolean indiquant si un utilisateur peut modifier les paramètres de l’affichage actif. Lecture-écriture.

Syntaxe

expression. LockUserChanges

Expression Variable qui représente un objet View .

Remarques

Si la valeur est True, l'utilisateur peut modifier les paramètres de l'affichage actif. En revanche, les modifications apportées à l'interface ne sont pas enregistrées. Si la valeur est False (valeur par défaut), toutes les modifications sont enregistrées.

Exemple

L'exemple d'après montre comment verrouiller l'interface utilisateur pour tous les affichages disponibles à l'ensemble des utilisateurs. La sous-routine LockView accepte l’objet View et une valeur booléenne qui indique si l’interface View sera verrouillée. Dans cet exemple, la procédure est toujours appelée avec la valeur booléenne définie sur 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

Voir aussi

Objet View

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.