Método Permission.Add (Office)

Crea un conjunto de permisos en el documento activo para el usuario especificado. Devuelve un objeto UserPermission .

Sintaxis

expresión. Agregar (UserID, Permission, ExpirationDate)

expresión necesaria. Variable que representa un objeto Permission.

Parameters

Nombre Obligatorio/opcional Tipo de datos Descripción
UserID Obligatorio String Dirección de correo electrónico (en el formato user@domain.com) del usuario al que se conceden permisos en el documento activo.
Permiso Opcional MsoPermission Los permisos en el documento activo que se conceden al usuario especificado.
ExpirationDate Opcional Date Fecha de vencimiento de los permisos que se conceden.

NOTA: este parámetro no se usa y se omitirá.

Ejemplo

En el siguiente ejemplo se asigna a un usuario una combinación de permisos de lectura y modificación en el documento activo y se especifica una fecha de vencimiento para dichos permisos.

 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 

Vea también

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.