469,148 Members | 1,316 Online
Bytes | Developer Community
New Post

Home Posts Topics Members FAQ

Post your question to a community of 469,148 developers. It's quick & easy.

Currency Text Box in Excel Form

I am attempting to have an entry on a form that will format the entry
to a currency amount.

For example, if the user types 3452, I would like the form to
store/display 34.52.

If the user types 99, I would like the form to store/display 0.99, or
..99.

Any suggestions as to how to go about this?

Thanks.

Dave

Jul 17 '05 #1
1 8481
Private Sub Text1_LostFocus() 'you may also test with Change event
on error resume next 'to avoid errors
text1.text=format(ccur("0" & text1.text),"#.##0,00") 'the "0" prefix is
to allow convertion to zero when text1 is empty
End Sub

Bye
Elef

"DaveA" <da*********@atk.com> ha scritto nel messaggio
news:11*********************@o13g2000cwo.googlegro ups.com...
I am attempting to have an entry on a form that will format the entry
to a currency amount.

For example, if the user types 3452, I would like the form to
store/display 34.52.

If the user types 99, I would like the form to store/display 0.99, or
.99.

Any suggestions as to how to go about this?

Thanks.

Dave

Jul 17 '05 #2

This discussion thread is closed

Replies have been disabled for this discussion.

Similar topics

2 posts views Thread by Dalan | last post: by
5 posts views Thread by Manuel Canas | last post: by
1 post views Thread by zacks | last post: by
5 posts views Thread by Steven Smith | last post: by
5 posts views Thread by Paul Miller | last post: by
reply views Thread by zhoujie | last post: by
By using this site, you agree to our Privacy Policy and Terms of Use.