Hi, I have 20 checboxes, and i need the same principle for each,
Sub checkbox1_click()
If CheckBox1.Value Then
Range("l6").Formula = "=K33"
Else
Range("l6").Value = 0
End If
End Sub
So I have so far:
For each checkbox in wks
If CheckBoxa.Value Then
Range("l(a+1)").Formula = "=$K$33"
Else
Range("l(a+1)").Value = 0
End If
End Sub
Bookmarks