Hi

Insert a checkbox from the Command Toolbox menu, and right click on
the checkbox. Select "View code". Inset the code below into the code
sheet.
Exit design mode. Enter "10" in B1 and test it:


Private Sub CheckBox1_Change()
TargetCol = "A"
Range("B1").Copy

If Me.CheckBox1.Value = True Then
Columns(TargetCol).PasteSpecial Paste:=xlAll,
Operation:=xlMultiply
Else
Columns(TargetCol).PasteSpecial Paste:=xlAll, Operation:=xlDivide
End If
End Sub

Regards,
Per


On 9 Dec., 15:29, Cmenkedi wrote:
Hello,
I want to use a checkbox on a worksheet to change the calculation of all the
rows in a column.
Example:
Column A
1
2
3
4
5
If I check the check box I want to mutiply each number by 10. If I uncheck
it I want to devide each number by 10.
I am a novice at programing in Excel so any help will be great.
Thank You