Propriedade UserPermission.UserId (Office)
Obtém o nome de email do usuário cujas permissões no documento ativo são determinadas pelo objeto UserPermission especificado. Somente leitura.
Sintaxe
expressão. Userid
Expressão Uma variável que representa um objeto UserPermission .
Comentários
O objeto UserPermission associa um conjunto de permissões no documento ativo com um único usuário e uma data de vencimento opcional. A propriedade UserID retorna o nome no formulário de email do usuário cujas permissões são determinadas pelo objeto UserPermission especificado.
Exemplo
O exemplo a seguir lista os usuários que têm permissões no documento ativo.
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
Confira também
Suporte e comentários
Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.