I've also seen this used for Excel 97

Sub test()
Dim str As String

str = " this is a string "

str = WorksheetFunction.Substitute(str, " ", "")

MsgBox str
End Sub


--
Rob van Gelder - http://www.vangelder.co.nz/excel


"Jan Karel Pieterse" wrote in message
...
Date: Sun, 16 Jan 2005 11:48:01 +0100
To: Maileen
Bcc: Jan Karel Pieterse
Subject: erase all space characters into string
From: Jan Karel Pieterse

Hi Maileen,

I would like to get from " this is a string ", this string
"thisisastring".

Dim sString as String
sString=" this is a string "
sString=Replace(sString," ","")
Msgbox sString

Works for Excel 2000 and up.

Regards,

Jan Karel Pieterse
Excel MVP
www.jkp-ads.com