Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Testing for a currency ..
Dear members;
I have auserform with textbox in which amounts have to be entered. I want to test for correct input. My question is how do I do that. Is there something like : Isdate, but then for currencies ?? Thanks in advance. Mark. |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Testing for a currency ..
Nothing built in so here's a suggestion:
Function IsCurrency(ByVal Expression As Variant) As Boolean Dim curTest As Currency On Error Resume Next curTest = CCur(Expression) IsCurrency = (Err.Number = 0) On Error GoTo 0 End Function "Mark Rosenkrantz" wrote in message ... Dear members; I have auserform with textbox in which amounts have to be entered. I want to test for correct input. My question is how do I do that. Is there something like : Isdate, but then for currencies ?? Thanks in advance. Mark. |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Testing for a currency ..
Thanks;
I'll try that. Mark. "onedaywhen" wrote in message om... Nothing built in so here's a suggestion: Function IsCurrency(ByVal Expression As Variant) As Boolean Dim curTest As Currency On Error Resume Next curTest = CCur(Expression) IsCurrency = (Err.Number = 0) On Error GoTo 0 End Function "Mark Rosenkrantz" wrote in message ... Dear members; I have auserform with textbox in which amounts have to be entered. I want to test for correct input. My question is how do I do that. Is there something like : Isdate, but then for currencies ?? Thanks in advance. Mark. |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
How to add new currency Symbol in Format/Cell/Currency | Excel Discussion (Misc queries) | |||
Testing | Excel Discussion (Misc queries) | |||
how do I sum currency values in a row containing currency and uni. | Excel Worksheet Functions | |||
TESTING | Excel Worksheet Functions | |||
Testing | Excel Discussion (Misc queries) |