Dimensiones de formato personalizado de un cuadro en Excel

Actualmente estoy creando una hoja de cálculo en Excel y estableciendo un estándar para todo lo que estoy copiando. Parte del texto que estoy ingresando es diferente al formato en el que lo quiero.

El formato que quiero es, por ejemplo: Los 233 X 223 X 34datos que ingresan generalmente son:233x233x34

¿Hay alguna forma de convertir el texto al formato en el que lo quiero?

Incluya la siguiente macro de evento en el área de código de la hoja de trabajo:

Private Sub Worksheet_Change(ByVal Target As Range)
Dim r As Range
Application.EnableEvents = False
    For Each r In Target
        v = r.Value
        If InStr(1, v, "X") > 0 Then
            r.Replace "X", " X "
            r.Replace "  X  ", " X "
        End If
    Next r
Application.EnableEvents = True
End Sub