Как мне установить флажок, чтобы включить более одной ячейки данных?

Question

Я работаю над матрицей, где вы можете сравнить товары и их варианты друг с другом. Я создал макрос, связанный с таблицей данных в моей книге (под названием портативные устройства). Если вы установите флажки для параметров, они будут включать данные из книги Portables и помещать их в таблицу матрицы. Вы можете щелкнуть каждый флажок, чтобы включить параметр; однако некоторые из опций включены в продукт. Я ищу способ, которым при установке флажка продукта он автоматически устанавливает флажки, включенные в этот продукт. Ниже приведен код VBA, который я использовал.

Sub AddCheckBoxes()
    On Error Resume Next
    Dim c As Range, myRange As Range
    Set myRange = Selection
    For Each c In myRange.Cells
        ActiveSheet.CheckBoxes.Add(c.Left, c.Top, c.Width, c.Height).Select
            With Selection
                .LinkedCell = c.Address
                .Characters.Text = ""
                .Name = c.Address
            End With
            c.Select
            With Selection
                .FormatConditions.Delete
                .FormatConditions.Add Type:=xlExpression, _
                    Formula1:="=" & c.Address & "=TRUE"
                .FormatConditions(1).Font.ColorIndex = 2 'change font color to white when checked
                .FormatConditions(1).Interior.ColorIndex = 2 'change backgrounf color to white when checked
                .Font.ColorIndex = 2 'change font color to white when unchecked
                .Interior.ColorIndex = 2 'change background color to white when unchecked
            End With
        Next
        myRange.Select
End Sub

Буду благодарен за любую помощь.