Hello all,

After opening a protected workbook, all of my macros work except for one that changes the color scale on a map on the interface. I receive a Run time 1004 error. However, if I unprotect the workbook, it works just fine. I can even reprotect the workbook, and it will work; I only receive the error immediately after opening the workbook while it's still protected.

The code is lengthy but is listed below. ***'s mark the line where the error is given.

Sub UpdateColorScale()
' Update the RGB values and the colors of the legend after changing the color scale on worksheet [control]

Dim i As Integer
Dim rngMapValueToColor As Range
Dim rngColorScales As Range
Dim rngColorScaleSelection As Range
Dim rngLegend As Range

    ' Initialize
    Application.ScreenUpdating = False
    Set rngMapValueToColor = [rng_COLOR_MAP].Offset(0, 1).Resize([rng_COLOR_MAP].Rows.count, 1)
    Set rngColorScales = [rng_COLOR_SCALE]
    Set rngColorScaleSelection = [ind_COLOR]
    Set rngLegend = [rng_LEGEND]
    
    ' Loop through the defined color scale and write the RGB values to the [control] sheet / format the legend cells on the map
    For i = 1 To rngMapValueToColor.Rows.count
        rngMapValueToColor(i, 1) = rngColorScales(i, rngColorScaleSelection.Value).Interior.Color
       *** rngLegend(i, 1).Interior.Color = rngColorScales(i, rngColorScaleSelection.Value).Interior.Color***
    Next i
    
    ' Update the map to apply the new color to the choropleth map
    UpdateMap
    
    ' Clean Up
    Set rngMapValueToColor = Nothing
    Set rngColorScales = Nothing
    Set rngColorScaleSelection = Nothing
    Set rngLegend = Nothing
    Application.ScreenUpdating = True
    
End Sub
Any direction would be greatly appreciated. Thanks!
Joe