removing all spaces from a string... 1

[ftpdoo]

Hi,

I've got a string which contains a binary number

ie: " 0 0 1 0"

But I want to remove the spaces to simply leave "0010"


Please help,
Jonathan

 

[wadjssd]

Try this...

Sub MyMacro()
With ActiveSheet.Cells
.Replace What:=" ", Replacement:=""
End With
End Sub


This will remove the leading zero's - but for a binary, that's obviously not a problem...!!

Cheers.
wadjssd

 

[dsb]

use the vb function
string = replace(string," ","&quot