Nota:
El acceso a esta página requiere autorización. Puede intentar iniciar sesión o cambiar directorios.
El acceso a esta página requiere autorización. Puede intentar cambiar los directorios.
Obtiene el nombre de correo electrónico del usuario cuyos permisos en el documento activo están determinados por el objeto UserPermission especificado. Solo lectura.
Sintaxis
expresión. UserId
expresión Variable que representa un objeto UserPermission .
Observaciones
El objeto UserPermission asocia un conjunto de permisos en el documento activo a un único usuario y una fecha de caducidad opcional. La propiedad UserID devuelve el nombre en forma de correo electrónico del usuario cuyos permisos están determinados por el objeto UserPermission especificado.
Ejemplo
En el ejemplo siguiente se enumeran los usuarios que tienen permisos en el documento activo.
Dim irmPermission As Office.Permission
Dim irmUserPerm As Office.UserPermission
Dim strUsers As String
Set irmPermission = ActiveWorkbook.Permission
If irmPermission.Enabled Then
For Each irmUserPerm In irmPermission
strUsers = strUsers & irmUserPerm.UserId & vbCrLf
Next
MsgBox strUsers, _
vbInformation + vbOKOnly, "IRM Information"
Else
MsgBox "Permissions are not enabled for this document.", _
vbInformation + vbOKOnly, "IRM Information"
End If
Set irmUserPerm = Nothing
Set irmPermission = 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.