作業中の文書に対するアクセス許可が指定された UserPermission オブジェクトによって決定されるユーザーの電子メール名を取得します。 読み取り専用です。
構文
式。Userid
式UserPermission オブジェクトを表す変数。
注釈
UserPermission オブジェクトは、アクティブ ドキュメントに対するアクセス許可のセットで 1 人のユーザーおよびオプションの有効期限の日付。 UserID プロパティは、指定された UserPermission オブジェクトによってアクセス許可が決定されるユーザーのメール形式で名前を返します。
例
次の使用例は、アクティブ ドキュメントに対するアクセス許可を持つユーザーの一覧を表示します。
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
関連項目
サポートとフィードバック
Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。