Свойство Permission.PolicyName (Office)
Возвращает имя политики разрешений, применяемой к активному документу. Только для чтения.
Синтаксис
expression. PolicyName
Выражение Переменная, представляющая объект Permission .
Замечания
Microsoft Office Information Rights Management поддерживает использование политик административных разрешений, которые содержат список пользователей и групп и их разрешений для документов. Свойство PolicyName возвращает имя политики, применяемой к активному документу, или значение по умолчанию, если политика не использовалась.
Пример
В следующем примере отображаются сведения о политике разрешений для активного документа.
Dim irmPermission As Office.Permission
Dim strIRMInfo As String
Set irmPermission = ActiveWorkbook.Permission
If irmPermission.Enabled Then
strIRMInfo = "Permissions are restricted on this document." & vbCrLf
If irmPermission.PermissionFromPolicy Then
strIRMInfo = strIRMInfo & " Permissions applied from policy:" & vbCrLf & _
" Policy name: " & irmPermission.PolicyName & vbCrLf & _
" Policy description: " & irmPermission.PolicyDescription
Else
strIRMInfo = strIRMInfo & " Default permissions applied." & vbCrLf & _
" Default policy name: " & irmPermission.PolicyName & vbCrLf & _
" Default policy description: " & irmPermission.PolicyDescription
End If
Else
strIRMInfo = "Permission are NOT restricted on this document."
End If
MsgBox strIRMInfo, vbInformation + vbOKOnly, "IRM Information"
Set irmPermission = Nothing
См. также
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.