Hey Community!
I struggeled today and spend to much time trying to find the solution. I have this code:
___________________________________________
Sub LinkCheckBoxes()
Dim chk As CheckBox
Dim lCol As Long
lCol = 0 'number of columns to the right for link
For Each chk In ActiveSheet.CheckBoxes
With chk
.LinkedCell = _
.TopLeftCell.Offset(0, lCol).Address
End With
Next chk
End Sub
__________________________________________
This Code is linking all the Checkboxes in the ActiveSheet to the cells below. But now I want to search in the last checkbox in Column A and only apply this operation to this Checkbox. I'm able to find the last cell in Column A but I don't know how to refer to the checkbox above.
Thanks for your Help, this Forum is so great!!
Jens
|