Showing a calculation in a userform Textbox

Ok...

I am trying to make a text box (aptly named txtCalc) to show a
calculation between another txt box (txtAmount) and a cell that exists
in the spreadsheet behind the form. The calculation will show a bank
balance preview.

For example the cell that is mentioned above is Cell F1 and contains a
figure of =A39000

In the userform, the user enters a transaction of - =A3500 in txtAmount
field. thus the txtCalc area automatically shows a figure of =A38500.
This figure does not have to go onto the spreadsheet (but can if
needed).

How can this be done...

Cheers (much in advance)

Jamie

Hi Jamie,

You just need to put some code behind the on change event or the exit
event of the text box your entering the figure into. In design mode
just double click on txtamount and it should take you to the correct
event.

You would then put something like:

me.textcalc =3D Worksheets("Sheet1").Range("F1") - me.txtAmount

Cheers,

James

[email protected] wrote:
> Ok...
>
> I am trying to make a text box (aptly named txtCalc) to show a
> calculation between another txt box (txtAmount) and a cell that exists
> in the spreadsheet behind the form. The calculation will show a bank
> balance preview.
>
> For example the cell that is mentioned above is Cell F1 and contains a
> figure of =A39000
>
> In the userform, the user enters a transaction of - =A3500 in txtAmount
> field. thus the txtCalc area automatically shows a figure of =A38500.
> This figure does not have to go onto the spreadsheet (but can if
> needed).
>=20
> How can this be done...
>=20
> Cheers (much in advance)
>=20
> Jamie

Roedd <<[email protected]>> wedi ysgrifennu:

> Ok...
>
> I am trying to make a text box (aptly named txtCalc) to show a
> calculation between another txt box (txtAmount) and a cell that exists
> in the spreadsheet behind the form. The calculation will show a bank
> balance preview.
>
> For example the cell that is mentioned above is Cell F1 and contains a
> figure of £9000
>
> In the userform, the user enters a transaction of - £500 in txtAmount
> field. thus the txtCalc area automatically shows a figure of £8500.
> This figure does not have to go onto the spreadsheet (but can if
> needed).
>

Are you saying that the user will input /literally/ the string "- £500" in
the textbox, operator and all?

It would make this a whole lot easier if you could get them to leave the
currency symbol out. Presumably the currency symbol on the value in the
worksheet is only there as a result of formatting?

Then you could use something like:

txtCalc.value = Application.Evaluate(cstr(range("F1")) & txtAmount.Value)

....though you're going to have to include a fair amount of validation and
error trapping.

--
Rob