Propriété View.SaveOption (Outlook)

Renvoie une constante OlViewSaveOption qui spécifie les dossiers dans lesquels la vue spécifiée est disponible et les autorisations de lecture attachées à la vue. En lecture seule.

Syntaxe

expression. SaveOption

Expression Variable qui représente un objet View .

Remarques

La propriété SaveOption est définie lorsque l’objet View est créé à l’aide de la méthode Views.Add .

Exemple

Le premier exemple de code Microsoft Visual Basic pour Applications (VBA) présenté ci-dessous montre comment afficher le nom de tous les affichages auxquels l’ensemble des utilisateurs peuvent accéder dans le dossier Notes.

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.