I have a table which will be filtered and ordered. I have a checkbox in each row. When the ActiveX control checkbox is selected I want to update a column on the same row to be True or False. The problem is that when the order is changed a checkbox will update the True/False column on a different row - not the row you are selecting. The code below should find the cell address of a checkbox and update the corresponding row in the True/False column.


Private Sub CheckBox1_Click()
Set Rng = ActiveSheet.CheckBoxes("CheckBox1").TopLeftCell
If CheckBox1 Then
ActiveSheet.Range(Rng.Address).Value = "TRUE"
Exit Sub
End If
ActiveSheet.Range(Rng.Address).Value = "FALSE"
End Sub

I'm getting "Unable to get the CheckBoxes property of the Worksheet class" right now.