Partager via


Permission.Add, méthode (Office)

Crée un jeu d'autorisations relatif au document actif pour l'utilisateur spécifié. Renvoie un objet UserPermission .

Syntaxe

expression. Add (UserID, Permission, ExpirationDate)

expression Obligatoire. Variable qui représente un objet Permission .

Parameters

Nom Requis/Facultatif Type de données Description
UserID Requis String Adresse e-mail (au format user@domain.com) de l’utilisateur auquel les autorisations sur le document actif sont accordées.
Permission Facultatif MsoPermission Type d'autorisations associées au document actif qui sont accordées à l'utilisateur spécifié.
ExpirationDate Facultatif Date Date d'expiration des autorisations qui sont accordées.

REMARQUE : ce paramètre n’est pas utilisé et sera ignoré.

Exemple

L'exemple suivant affecte à un utilisateur une combinaison d'autorisations de lecture et de modification sur le document actif et spécifie une date d'expiration de ces autorisations.

 Dim objUserPerm As Office.UserPermission 
 Set objUserPerm = ActiveWorkbook.Permission.Add( _ 
 "user@domain.com", _ 
 msoPermissionRead + msoPermissionEdit, #12/31/2005#) 
 MsgBox "Permissions added for " & _ 
 objUserPerm.UserId, _ 
 vbInformation + vbOKOnly, _ 
 "Permissions Added" 
 Set objUserPerm = Nothing 

Voir aussi

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.