Observação
O acesso a essa página exige autorização. Você pode tentar entrar ou alterar diretórios.
O acesso a essa página exige autorização. Você pode tentar alterar os diretórios.
Cria um conjunto de permissões no documento ativo para o usuário especificado. Devolve 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 e-mail (no formato user@domain.com) do utilizador ao qual estão a ser concedidas permissões no documento ativo. |
| 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. NOTA: este parâmetro não é utilizado 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.