Since you posted in programming group.

Public Sub Strip_WhiteSpace()
Selection.Replace what:=" ", _
replacement:="", lookat:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False
End Sub


Gord Dibben MS Excel MVP

On Wed, 26 Aug 2009 01:13:10 -0700, thomas donino
wrote:

I have a list of names in one column. I want to trim the space from the
middle so that Jim Jones looks like JimJones. Any help?

Thank You