Showing a calculation in a userform Textbox
Roedd 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
|