Salut
ma soluce en vba:
basé sur un code de 'Mc Ritchie (MPEP)'
' sélectionner les cellules avant de lancer la macro
Sub REMOVESPACE()
'David McRitchie 2000-02-28 excel.programming
Application.ScreenUpdating = False
Dim temp As String
Dim cell As Range
For Each cell In Selection ' .SpecialCells(xlCellTypeConstants, 2)
'above limits to constants which are TEXT
If InStr(1, cell.Value, Chr(160)) Then 'Insure possibility of change
temp = Trim(cell.Value)
While InStr(temp, Chr(160)) > 0
temp = Replace(temp, Chr(160), '')
Wend
cell.Value = Trim(temp)
End If
Next
End Sub