format number in textbox on userform

[MKLAQ]

hello
I have 4 textboxes linked with 4 cells when I run the userform should show the number like this 1,200,300.00 in four textboxes
this what i got but not work

Private Sub UserForm_Activate()
TextBox1.value = Format(TextBox1.value, "#,##0.00")
TextBox2.value = Format(TextBox2.value, "#,##0.00")
TextBox3.value = Format(TextBox3.value, "#,##0.00")
TextBox4.value= Format(TextBox4.value, "#,##0.00")
End Sub

any suggestion,please ?

 

[6StringJazzer]

What does it do instead of what you want?

 

[Marc L]

Hi,​

If the cell is well formatted so the better is to use the Text property of the cell rather than formatting the Text Box …​

 

[6StringJazzer]

I missed that the textboxes are linked to cells. If you change the textboxes as shown, it will update the linked cells to text, and then may re-convert to numbers and you are back where you started. If you care about the formatting in the textboxes you should not link them to cells to populate them. That technique should be used only to enter data in the textboxes that will be used to populate the cells.

You need to explain your whole scenario so we can suggest an alternative approach.

 

[MKLAQ]

@6StringJazzer I've found many solution by change or exit event but this is not what I want , theses work when enter the values as you said but I want to do that when I userform like search theses texboxes linked with listbox when run the userform should show all data in listbox and textboxes by Activate or Initialize events in userform , is it possible?