Método Permission.Add (Office)
Cria um conjunto de permissões no documento ativo para o usuário especificado. Retorna um objeto UserPermission .
Sintaxe
expressão. Adicionar (UserID, Permission, ExpirationDate)
expressão Obrigatório. Uma variável que representa um objeto Permission.
Parâmetros
Nome | Obrigatório/Opcional | Tipo de dados | Descrição |
---|---|---|---|
UserID | Obrigatório | String | O endereço de email (no formato user@domain.com) do usuário a quem as permissões no documento ativo estão sendo concedidas. |
Permissão | Opcional | MsoPermission | As permissões do documento ativo que estão sendo concedidas ao usuário especificado. |
ExpirationDate | Opcional | Data | A data de validade para as permissões que estão sendo concedidas. OBSERVAÇÃO: esse parâmetro não é usado e será ignorado. |
Exemplo
Este exemplo atribui uma combinação de permissões de leitura e edição no documento atual a um usuário e especifica uma data de validade para essas permissões.
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
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.