how do i change the value of a cell with a checkbox

R

Rollie13

I'm trying to have a cell value changed on the click of a checkbox. The total
value of the cell must change according to the checkbox selected. It's for an
automated expense account sheet which calculate the amount of mileage done in
a month and a grand total of the entire year along with monthly reimbursement.

Tx for any help
 
C

Corey

Private Sub CheckBox1_Click()
If Range("A1").Value = True Then ' <=== Linked Cell for Check box (Check Box
Properties)
Range("B1").Value = "100" '<======== Cell(B1) is the cell value you want to
modify depending on check box result
Else
Range("B1").Value = "200"
End If
End Sub

Corey....
 
V

Vaughan

In design view, open the properties sheet for the check box. Enter a cell
reference in the LinkedCell property. This cell will be True if the check box
is ticked and false if it isn't. You can then test the cell in your formula.
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Change the colour of a neighbouring cell 6
Overwriting a cell with a formula without deleting the formula 1
How to replace a cell's formula with a non-zero calculated value? 1
Word VBA - Automatic change content of a cell in table using dropdown list 5
How to record changing value of a cell 2
How do I create a graph from a worksheet? 2
Copy the content of a cell with Formula 1
How do I change the color of a checkbox? 1

Top