Jenst
09-16-2016, 01:06 PM
Hey Community!
I struggeled today and spend to much time trying to find the solution:banghead:. 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!! :yes
Jens
I struggeled today and spend to much time trying to find the solution:banghead:. 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!! :yes
Jens