UserForm Kayıt Formunda TextBoxtaki Fazla Boşlukları Silme

[Astalavista58]

Merhaba hayırlı akşamlar herkese, sorum, textboxtaki değeri kaydederken gereksiz boşluk varsa silmesini istiyorum.
Örneğin;
Ankara Valiliği - gibi değil de boşlukları alıp
Ankara Valiliği gibi kayıt etsin

 

[veyselemre]

Range("A1").Value = Trim(TextBox1.Text) 'baştaki ve sondaki boşlukları atar.
Range("A1").Value = WorksheetFunction.Trim(TextBox1.Text) ' ayrıca ortadaki birden fazla olan boşlukları da atar

 

[Astalavista58]

Range("A1").Value = Trim(TextBox1.Text) 'baştaki ve sondaki boşlukları atar.
Range("A1").Value = WorksheetFunction.Trim(TextBox1.Text) ' ayrıca ortadaki birden fazla olan boşlukları da atar

Veysel Emre hocam çok teşekkür ediyorum, hayırlı akşamlariniz olsun