VBA code to delete the space at the first or end and one of tow spaces together

HI

I have a user form to save data.
Is there Any way to delete the spaces that the user add at the first or end of the data in a text box? Or don't save this spaces in cell?

and

is there any way to delete all spaces between two words that are typed in text boxes except one? Or don't save them in cell?


thank you,

s_samira_21,

What you're looking for is the Trim() operator.

Please Login or Register  to view this content.

Hope that helps,
~tigeravatar

thank you very much

but unfortunately I don't Know how to use this code
I used this but it doesn't work.

ws.Cells(iRow, 1).Value = Trim(Me.txtCode.Value)

could you please help me?

s_samira_21,

Instead of textbox.value, use textbox.text:

Please Login or Register  to view this content.

Hope that helps,
~tigeravatar

thank you

in works for spaces at the first and end of the words
but it doesn't work for spaces between words

s_samira_21,

Ah, I see. That's what I get for not testing it. I created a UDF that can be used to remove all extra spaces:

Please Login or Register  to view this content.

To use it, just feed a variable into it:

Please Login or Register  to view this content.

Hope that helps,
~tigeravatar

Hi again

thank you

I put first part in top of the form code
but I don't know where should I use the second part

sorry I almost don't know anything about VBA