Поделиться через


Свойство 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 и обратная связь.