Buenas,
pues así de repente se me ocurre que podrías tomar la cadena, ir recorriéndola buscando la posición de los espacios (con
InStr) e ir mirando la distancia entre espacios consecutivos. Si es más de la que quieres, le cascas un espacio y arreglado.