Workbook.Permission (Excel)

Retorna um objeto Permission que representa as configurações de permissão na pasta de trabalho especificada.

Dim prmPermission As Office.Permission
Set prmPermission = ActiveWorkbook.Permission