Salut,
ce n'est pas le plus élégant mais ca marche
colle ceci dans la partie VBA de ta feuille
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim zone As Range
Set zone = Range("b2:d15")
For Each cell In zone
If cell.Value = " " Then
cell.Value = ""
End If
Next
End Sub
Si il y a un espace il sera supprimé sinon il te laisse tes données (c'est la moundre des choses...

)
Pierre