Назначить CheckBox LinkedCell переменной

Question

Я пытаюсь сгенерировать список заданий в виде серии флажков, чтобы их можно было очистить как выполненные.Мой код ищет первые 10 заданий, которые соответствуют определенным критериям, а затем назначает название задания в качестве заголовка флажка, это отображается в пользовательской форме.Я хочу связать ячейку в той же строке, но я не знаю, как она должна быть записана.

Если я закомментирую бит, в котором я пытаюсь назначить LinkedCell, тогда все работает.Я прочитал много ответов на подобные вопросы, и я вижу, что в идеальном мире формат связанной ячейки был бы "A1", но я не знаю, как переписать srcWS.Cells (cardRow ,idityClosed) .Address', поэтому его можно использовать

Set srcWS = ActiveWorkbook.Worksheets("Sheet1")
For Each contr In Me.Controls
    If TypeName(contr) = "CheckBox" Then
        For cardRow = startCount To srcWS.Range(staffID & srcWS.Rows.count).End(xlUp).row
            If srcWS.Cells(cardRow, defectDesc).Value <> "" Then
                contr.Caption = srcWS.Cells(cardRow, defectCount).Value & "   " & srcWS.Cells(cardRow, defectDesc).Value _
                & "   " & srcWS.Cells(cardRow, taskcardID).Value
                contr.LinkedCell = srcWS.Cells(cardRow, defectClosed).Address
                startCount = cardRow + 1
                Exit For
            End If
        Next
    End If
Next
End Sub

Я получаю сообщение об ошибке "Объект не поддерживает это свойство или метод"

Answer 1

Рикардо А и Тим Уильямс, вы абсолютные легенды !! Спасибо, что нашли время, чтобы указать мне в правильном направлении. Я установил

contr.Tag = cardRow

а потом написал

srcWS.Cells(CheckBox1.Tag, defectClosed).Value = "Closed"

Всякий раз, когда устанавливается этот флажок.