I have a total of 648 textboxes on my form. Some of the textboxes allow for char values, some numeric and some monetary. The problem I am running into is with the monetary. I am trying to say on initialize, I want to autoformat 208 of these textboxes to $0.00 and when the users puts in an actual amount it changes to $100.00 or whatever the amount. It would be ideal to just have the textbox blank and when the users puts in something it is formatted automatically to $100.00. Just like I would if I were formatting an Excel column or cell. Here is my code so far: (hopefully no typos in code. Cannot copy and paste as using home computer. My work computer blocks the excelforum.com site. not sure why)
'
Code:
private sub userform_initialize()
' populate contract
me.combobox1.list = sheets("contracttype").cells(1,1).currentregion.columns(1).value
'populate implant category
me.combobox2.list = sheets("implantcategory").cells(1,1).currentregion.columns(1).value
'format dollar values
textbox128.text = format(textbox128.text, "$0.00")
textbox129.text = format(textbox129.text, "$0.00")
textbox130.text = format(textbox130.text, "$0.00")
textbox131.text = format(textbox131.text, "$0.00")
textbox132.text = format(textbox132.text, "$0.00")
textbox133.text = format(textbox133.text, "$0.00")
textbox134.text = format(textbox134.text, "$0.00")
textbox135.text = format(textbox135.text, "$0.00")
and so on for all 208 textboxes'
