Partager via


Propriété TimelineView.LockUserChanges (Outlook)

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

Syntaxe

expression. LockUserChanges

Expression Variable qui représente un objet TimelineView .

Remarques

Si la valeur est True, l'utilisateur peut modifier les paramètres de l'affichage indiqué. 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 Visual Basic pour Applications (VBA) ci-dessous indique 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 utilisateur View est verrouillée. Dans cet exemple, la procédure est toujours appelée avec la valeur de type Boolean égale à 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

Voir aussi

TimelineView, objet

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.