Remove Empty Space

[Maneesh Massey]

Hi,
I'd like to have the empty space between 2 words removed in VBA. I'm using Excel 2013 and working on an application using a UserForm. Users make selection from a Combo box which displays in a text box on the same form. The text box should display the word by removing empty space between them.
Does someone know how to do this ??
Appreciate all help. Thanks.
Regards,
Maneesh

 

[Hui]

Maneesh

Try some code like:

Private Sub TextBox1_AfterUpdate()
 TextBox2.Text = Replace(TextBox1.Text, " ", "")
End Sub

Replace Textbox1 with the source string and Textbox2 with the TextBox name you are using

 

[NARAYANK991]

Hi Maneesh ,

Something like this :

Private Sub ComboBox1_Change()
            TextBox1.Text = Replace(ComboBox1.List(ComboBox1.ListIndex), " ", "")
End Sub

Narayan

 

[Maneesh Massey]

Maneesh

Try some code like:

Private Sub TextBox1_AfterUpdate()
TextBox2.Text = Replace(TextBox1.Text, " ", "")
End Sub

Replace Textbox1 with the source string and Textbox2 with the TextBox name you are using

Hi Hui,
Thanks for helping me out !! Your code works wonderfully !!!

 

[Maneesh Massey]

Hi Maneesh ,

Something like this :

Private Sub ComboBox1_Change()
            TextBox1.Text = Replace(ComboBox1.List(ComboBox1.ListIndex), " ", "")
End Sub

Narayan

Thank you so much Narayank991. Your code has been adopted by me and works like a charm. CHEERS !!