Convert Currency (Or Number) Into Words

[lhooker]

Is it possible to convert a number (whether in the "Standard" or "Currency" format) into words ?

 

[jdraw]

Using Google I found this
http://support.microsoft.com/kb/95640

 

[pbaldy]

http://access.mvps.org/access/modules/mdl0001.htm

 

[lhooker]

JDraw,

I tried the suggested function (as instructed) and it worked in the
"Debug" window, but after saving the function as "ConvertCurrencyToEnglish",
it failed (when using it in a form). The textboxes are defined as follows:


Textboxes
Check_Amount - ("Currency" format)
Check_Amount_Word (No value selected)


Below is the contents of "Event" in "After Update" of the "Check_Amount"
textbox

=ConvertCurrencyToEnglish([Check_Amount_Word])

I'm getting "Run-time error '94': Invalid use of Null. What is the problem ?

 

[jdraw]

According to the link you could place that value in the control source of the text box

(he uses Northwind as example)

Open the Orders form in Design view and add a text box to the form. Set the text box's ControlSource property as follows:
=ConvertCurrencyToEnglish([Total])

I created a module with the functions, then took a form I had,
added a text box, updated the control source as suggested and it works fine.
see attached jpg.

Using the after update event of the textbox would require some vba.
Can you show readers the code in your afterUpdate event?

 

[lhooker]

JDraw/Paul,

I figured out the problem. I saved the module (i.e. "module1") to another name. It's working now. Thanks to the both of you !!!