Eliminate all spaces in a text string

[Guest]

Is there a function that will eliminate ALL spaces in a text string? TRIM
will eliminate all unnecessary spaces, but I have been asked if you can
eliminate all of them.

Thanks for any help.
Regards
Aehan

 

[JoAnn Paules]

Find and replace the spaces with nothing.

--
JoAnn Paules
MVP Microsoft [Publisher]

~~~~~
How to ask a question
http://support.microsoft.com/KB/555375

 

[Guest]

Thank you very much JoAnn, I should have thought of that - instead I've been
searching for a complicated formula!! Doh!

Find and replace the spaces with nothing.

--
JoAnn Paules
MVP Microsoft [Publisher]

~~~~~
How to ask a question
http://support.microsoft.com/KB/555375

Is there a function that will eliminate ALL spaces in a text string? TRIM
will eliminate all unnecessary spaces, but I have been asked if you can
eliminate all of them.

Thanks for any help.
Regards
Aehan

 

[Stefan Blom]

Use the Replace function:

Sub TestMacro()

Dim x As String
Dim y As String

x = " text with spaces "

y = Replace(x, " ", "")

Debug.Print y ' Prints: textwithspaces

End Sub

--
Stefan Blom
Microsoft Word MVP


in message
news:[email protected]...

 

[JoAnn Paules]

I'm usually the one who's trying to do something the hard way. ;-)

--
JoAnn Paules
MVP Microsoft [Publisher]

~~~~~
How to ask a question
http://support.microsoft.com/KB/555375

Thank you very much JoAnn, I should have thought of that - instead I've
been
searching for a complicated formula!! Doh!

Find and replace the spaces with nothing.

--
JoAnn Paules
MVP Microsoft [Publisher]

~~~~~
How to ask a question
http://support.microsoft.com/KB/555375

Is there a function that will eliminate ALL spaces in a text string?
TRIM
will eliminate all unnecessary spaces, but I have been asked if you can
eliminate all of them.

Thanks for any help.
Regards
Aehan