I do not understand what you mean.

Below is the code that is currently used for each checkbox (with the
checkbox number changed for each):

Private Sub CheckBox11_Click()
If CheckBox11.Value = True Then
Worksheets("Pay-Calc").Cells(20, 2).Value = 16
Else: Worksheets("Pay-Calc").Cells(20, 2).Value = 8
End If
End Sub


Les

"Dave Peterson" wrote:

Why not just change the linked cell to point at that adjacent cell? Then you
don't even have to use code.




WLMPilot wrote:

I have 11 checkboxes (checkbox23-33). Currently, I have a macro per checkbox
that evaluates if box is True/False and then places a value in adjacent cell.

Is there a way to write one macro that will look at each checkbox and do the
same thing?

Thanks,
Les

--

Dave Peterson