I presume you want a macro. In order to write one, we need to know where the values you want parsed are located... what column or columns and starting at which row.
I do not know what you mean by "table box" nor can I see any reason to set Word Wrap on for a simple number in a cell, so I did not do either of those in this code. With that said, give this macro a try...
Sub RemoveSpecialCharacters()
Dim R As Long, C As Long, X As Long, Data As Variant
Data = Range("A2:C500")
For R = 1 To UBound(Data, 1)
For C = 1 To UBound(Data, 2)
For X = 1 To Len(Data(R, C))
If Mid(Data(R, C), X, 1) Like "[!0-9.]" Then Mid(Data(R, C), X) = " "
Next
Data(R, C) = Replace(Data(R, C), " ", "")
Next
Next
With Range("A2:C500")
.Value = Data
.Font.Name = "Calibri"
.Font.Size = 12
.HorizontalAlignment = xlCenter
.VerticalAlignment = xlCenter
End With
End Sub
I thought you only had numbers with extra characters and wanted just the numbers. Obviously, then, my code won't work for you as written. Can you show us several representative examples of the kinds of values that will be in those cells (vary their content as much a possible)? What I am concerned about is the "special symbols" (like dashes, commas) in the non-numeric parts of your values and not having my code delete them while removing them from the number part of the text. I am also interested if more than one number that needs treatment could be in a single cell.
