ProtectChartObject Property Example
This example protects embedded chart one on worksheet one.
Worksheets(1).ChartObjects(1).ProtectChartObject = True