Mega Code Archive

 

Categories / VisualBasic Script / Excel

 

Unprotect Chart

Sub UnprotectChart()     Dim myChart As Chart     Set myChart = ThisWorkbook.Sheets("Protected Chart")     myChart.Unprotect "Excel2003"     myChart.ProtectData = False     myChart.ProtectGoalSeek = False     myChart.ProtectSelection = False End Sub