ProtectWindows Property Example

This example displays a message if the windows in the active workbook are protected.

If ActiveWorkbook.ProtectWindows = True Then
    MsgBox "Remember, you cannot rearrange any" & _
        " window in this workbook."
End If