removing spaces in selected range

[ryan_law2000]

So im looking for some code that will do the following:

When anything is typed into a cell in range B2:C20
remove all spaces after data is entered.

example:

"B 452 CV 120" (after enter is selected / or different cell selected then it will look like:
"B452CV120"

how can this be done?
I know there is a formula that can do this in a different cell but I'm trying to stay away from formulas in this case.

 

[dave3009]

Perhaps something along these lines

Private Sub Worksheet_Change(ByVal Target As Range)
Dim c As Range
If Intersect(Target, Range("B2:C20")) Is Nothing Then Exit Sub
If Target.Count > 1 Then
    For Each c In Target
        c.Value = Replace(c.Value, " ", "")
        
    Next c
Else:
    Target.Value = Replace(Target.Value, " ", "")
End If
End Sub