Workbook.ProtectStructure (Excel)

True if the order of the sheets in the workbook is protected.

Dim booProtectStructure As Boolean
booProtectStructure = ActiveWorkbook.ProtectStructure