ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Add value when checkbox is ticked (https://www.excelbanter.com/excel-programming/365750-add-value-when-checkbox-ticked.html)

emel24

Add value when checkbox is ticked
 

Can anyone please tell me how to put a checkbox in an Excel Spead Shee
and when it is checked to add a value to a field?

Thanks in advance

--
emel2
-----------------------------------------------------------------------
emel24's Profile: http://www.excelforum.com/member.php...fo&userid=2000
View this thread: http://www.excelforum.com/showthread.php?threadid=55679


NickHK

Add value when checkbox is ticked
 
Depending what you require, but something like:
Private Sub CheckBox1_Click()
Const ExtraValue As Long = 25
If CheckBox1.Value = True Then
Range("A1").Value = Range("A1").Value + ExtraValue
Else
'Decide what you do here
End If
End Sub

NickHK

"emel24" wrote in
message ...

Can anyone please tell me how to put a checkbox in an Excel Spead Sheet
and when it is checked to add a value to a field?

Thanks in advance.


--
emel24
------------------------------------------------------------------------
emel24's Profile:

http://www.excelforum.com/member.php...o&userid=20004
View this thread: http://www.excelforum.com/showthread...hreadid=556792




emel24[_2_]

Add value when checkbox is ticked
 

Can you please advise where to enter this?
Is this a Macro?

Thanks in advance.


--
emel24
------------------------------------------------------------------------
emel24's Profile: http://www.excelforum.com/member.php...o&userid=20004
View this thread: http://www.excelforum.com/showthread...hreadid=556792


NickHK

Add value when checkbox is ticked
 
After you have added your combo box to the worksheet, view its code and this
is one of its events.
Private Sub CheckBox1_Click()

I assume you are using the check box from the Controls toolbox, not from
Forms.

NickHK

"emel24" wrote in
message ...

Can you please advise where to enter this?
Is this a Macro?

Thanks in advance.


--
emel24
------------------------------------------------------------------------
emel24's Profile:

http://www.excelforum.com/member.php...o&userid=20004
View this thread: http://www.excelforum.com/showthread...hreadid=556792




emel24[_3_]

Add value when checkbox is ticked
 

Yes, I wasn't using the Controls toolbox to create the checkbox. Your
formular works now.

However I am trying to do the following:
When checkbox1 is ticked I want to show 5% of the sum of a column in
another field. And when checkbox2 is ticked I want to show 10% of the
sum in another field.

For example: A7 = 500
When checkbox1 is ticked add 5%
Show value in A8 (being 25) if not ticked don't show a value
When checkbox 2 is ticket add 10%
Show value in A9 (being 50) if not ticked don't show a value

Thanks for your help! :-)


--
emel24
------------------------------------------------------------------------
emel24's Profile: http://www.excelforum.com/member.php...o&userid=20004
View this thread: http://www.excelforum.com/showthread...hreadid=556792


emel24[_4_]

Add value when checkbox is ticked
 

I have just noticed that when I tick the box it does the 5% however if I
untick it again it doesn't set it back to 0.
How can I do it, that whenever it is ticked or unticked to change the
value?


--
emel24
------------------------------------------------------------------------
emel24's Profile: http://www.excelforum.com/member.php...o&userid=20004
View this thread: http://www.excelforum.com/showthread...hreadid=556792


NickHK

Add value when checkbox is ticked
 
Just edit the previous code slightly:
Private Sub CheckBox1_Click()
If CheckBox1.Value = True Then
Range("A8").Value = Range("A7").Value * 1.05
Else
Range("A8").Value = 0 'Or "" if you want nothing to show
End If
End Sub

'This is effectively the same as the code above, FALSE=0, TRUE= -1
Private Sub CheckBox2_Click()
Range("A9").Value = Range("A7").Value * 1.1 * (CheckBox2.Value = True) * -1
End Sub

NickHK

"emel24" wrote in
message ...

Yes, I wasn't using the Controls toolbox to create the checkbox. Your
formular works now.

However I am trying to do the following:
When checkbox1 is ticked I want to show 5% of the sum of a column in
another field. And when checkbox2 is ticked I want to show 10% of the
sum in another field.

For example: A7 = 500
When checkbox1 is ticked add 5%
Show value in A8 (being 25) if not ticked don't show a value
When checkbox 2 is ticket add 10%
Show value in A9 (being 50) if not ticked don't show a value

Thanks for your help! :-)


--
emel24
------------------------------------------------------------------------
emel24's Profile:

http://www.excelforum.com/member.php...o&userid=20004
View this thread: http://www.excelforum.com/showthread...hreadid=556792




emel24[_5_]

Add value when checkbox is ticked
 

Thank you very much for all your help! :)


--
emel24
------------------------------------------------------------------------
emel24's Profile: http://www.excelforum.com/member.php...o&userid=20004
View this thread: http://www.excelforum.com/showthread...hreadid=556792



All times are GMT +1. The time now is 05:33 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com