Workbook.ProtectWindows (Excel)

True quando as janelas da pasta de trabalho estiverem protegidas. Boolean somente leitura.

Dim booProtectWindows As Boolean
booProtectWindows = ActiveWorkbook.ProtectWindows