Worksheet.ProtectDrawingObjects (Excel)

True if shapes are protected. To turn on shape protection, use the Protect method with the DrawingObjects argument set to True.

Dim booProtectDrawingObjects As Boolean
booProtectDrawingObjects = ActiveSheet.ProtectDrawingObjects