Summing up text boxes in user forms

scoha

Active Member
Joined
Jun 15, 2005
Messages
428
I have found some code ti help me sum up the values of text boxes but it doesnt work - gives a type mismatch error - is anyone able to assist??


I want to sum up the values I type into text boxes called txtBld, txtFix etc etc. The values I enter are percentage values (ie 45% entered as "45"). This ones puzzled for some time and I cant get past the error message

Private Sub Update_txtTot()

Dim Total As Currency
With Me
Total = CCur(.txtBld) + CCur(.txtFix) + CCur(.txtMot) + CCur(.txtPla) + CCur(.txtTrk) + CCur(.txtCom) + CCur(.txtOff) + CCur(.txtOhd)

.txtTot = Format(Total / 100, "0.00%")

End With

End Sub
 

Some videos you may like

Excel Facts

Did you know Excel offers Filter by Selection?
Add the AutoFilter icon to the Quick Access Toolbar. Select a cell containing Apple, click AutoFilter, and you will get all rows with Apple

BrianB

Well-known Member
Joined
Feb 17, 2003
Messages
8,127
You are using Currency format in error. - Should be using Double precision.

Code:
    Dim Total As Double
    Total = CDbl(TextBox1.Value) + CDbl(TextBox2.Value) + CDbl(TextBox3.Value)
    TextBox4.Value = Format(MyTotal / 100, "0.00%")
 

Watch MrExcel Video

Forum statistics

Threads
1,126,978
Messages
5,621,942
Members
415,868
Latest member
Pita

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Top