Chart.ProtectContents (Excel)

Es True si el contenido de la hoja está protegido.

Dim booProtectContents As Boolean
booProtectContents = ActiveChart.ProtectContents