Consejo: Otros idiomas son traducidos por Google. Puedes visitar el English versión de este enlace.
Iniciar sesión
x
or
x
x
Suscríbete
x

or

¿Cómo reemplazar espacios múltiples con espacio simple desde celdas en Excel?

doc reemplazar espacios múltiples 1

Supongamos que tengo una lista de cadenas de texto que contiene múltiples espacios, ahora, necesito reemplazar estos espacios con un solo espacio entre las cadenas de texto para separar las palabras como se muestra a continuación. ¿Cómo podría reemplazar los espacios múltiples con uno solo a la vez sin eliminarlos uno por uno?

Reemplazar espacios múltiples con espacio simple mediante el uso de la fórmula

Reemplazar espacios múltiples con espacio simple mediante el uso de código VBA

Reemplazar espacios múltiples con espacio simple usando Kutools para Excel


Eliminar espacios entre letras y palabras:

Kutools for Excel, Eliminar espacios la utilidad puede ayudarlo a eliminar varios tipos de espacios, como eliminar todos los espacios iniciales, espacios finales, todos los espacios, etc.

doc eliminar espacios

Kutools for Excel: con más de 200 útiles complementos de Excel, de prueba sin límite en días 60. Descargar y prueba gratis ahora!


Reemplazar espacios múltiples con espacio simple mediante el uso de la fórmula


En Excel, la función normal de Buscar y Reemplazar puede no funcionar bien para que podamos resolver este problema, entonces, podemos aplicar una fórmula simple para manejarlo. Por favor haz lo siguiente:

1. Ingresa esta fórmula: = TRIM (SUSTITUTO (A2, CHAR (32), "")) en una celda en blanco además del valor de su celda, vea la captura de pantalla:

doc reemplazar espacios múltiples 2

2. Entonces presione entrar para obtener el resultado, y seleccione la celda B2, luego arrastre el controlador de relleno a las celdas de rango donde desea aplicar esta fórmula, y todos los espacios extra se han eliminado de las cadenas de texto y solo se conservará un espacio el texto. Ver captura de pantalla:

doc reemplazar espacios múltiples 3


Reemplazar espacios múltiples con espacio simple mediante el uso de código VBA

Si está interesado en el código de VBA, puedo crear un código para que pueda reemplazar varios espacios con uno solo, haga lo siguiente:

1. Por favor, mantenga presionado ALT + F11 teclas para abrir el Microsoft Visual Basic para aplicaciones ventana.

2. Luego haga clic recuadro > Móduloy pegue el siguiente código en Módulo Ventana.

Código de VBA: Reemplazar espacios múltiples con espacio singe

Sub replace_multiplespaces()
'Updateby20150602
Dim x As Range
Dim Workx As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set Workx = Application.Selection
Set Workx = Application.InputBox("Range", xTitleId, Workx.Address, Type:=8)
    For Each x In Workx
        x = WorksheetFunction.Trim(x)
    Next x
End Sub

3. Entonces presione F5 tecla para ejecutar este código, y aparecerá un cuadro emergente para recordarle que seleccione el rango de datos que desea eliminar de los espacios adicionales, vea la captura de pantalla:

doc reemplazar espacios múltiples 4

4. Y luego haz clic OK botón, todos los espacios sobrantes se han reemplazado con un espacio individual entre el texto.


Reemplazar espacios múltiples con espacio simple usando Kutools para Excel

Si necesita eliminar otros tipos de espacios, como quitar los espacios iniciales, los espacios al final, todos los espacios del texto, recomendaré una herramienta poderosa:Kutools para Excel, con su Eliminar espacios utilidad, puede eliminar los espacios que necesite, como espacios principales, espacios finales, todos los espacios ...

Kutools for Excel : con más de 300 útiles complementos de Excel, de prueba sin límite en días 60.

Después de instalar Kutools for Excel, haz lo siguiente:

1. Seleccione el rango de datos que desea eliminar los espacios adicionales.

2. Hacer clic Kutools > Texto > Eliminar espacios, mira la captura de pantalla:

doc reemplazar espacios múltiples 5 5

3. En la Eliminar espacios cuadro de diálogo, elija Todos los espacios sobrantes del Tipo de espacios sección, y puede ver el resultado de Ver panel, ver captura de pantalla:

doc reemplazar espacios múltiples 6

4. Y luego haz clic Ok or Aplicar botón, todos los espacios extra se han eliminado de la celda y solo dejan un espacio en el texto.

Haga clic para obtener más información sobre esta función Quitar espacios.

Haga clic para descargar Kutools para Excel y prueba gratuita ¡Ahora!


Demostración: Reemplaza múltiples espacios con un solo espacio usando Kutools para Excel

Kutools for Excel: con más de 200 útiles complementos de Excel, de prueba sin límite en días 60. Descargar y prueba gratis ahora!


Kutools for Excel: la mejor herramienta de productividad de Office aumenta su productividad en un 80%

  • Super Formula Bar (edite fácilmente varias líneas de texto y fórmula); Diseño de lectura (lee y edita fácilmente un gran número de celdas); Pegar en rango filtrado...
  • Combinar celdas / filas / columnas y mantener datos; Contenido de celdas divididas; Combinar filas duplicadas y suma / promedio... Prevenir células duplicadas; Comparar rangos...
  • Seleccione Duplicado o Único Filas; Seleccionar filas en blanco (todas las celdas están vacías); Super Find y Fuzzy Find en muchos libros de trabajo; Selección aleatoria ...
  • Copia exacta Celdas múltiples sin cambiar la referencia de fórmula; Crear referencias automáticamente a múltiples hojas; Insertar viñetas, Casillas de verificación y más ...
  • Fórmulas favoritas e insertadas rápidamente, Gamas, cuadros y cuadros; Cifrar celdas con contraseña Crear una lista de correo y enviar correos electrónicos ...
  • Extracto del texto, Agregar texto, Eliminar por posición, Eliminar espacio; Crear e imprimir subtotales de paginación; Convertir entre contenido de celdas y comentarios...
  • Súper filtro (guardar y aplicar esquemas de filtro a otras hojas); Clasificación avanzada por mes / semana / día, frecuencia y más; Filtro especial por negrita, cursiva ...
  • Combinar libros de trabajo y hojas de trabajo; Combinar tablas basadas en columnas clave; Dividir datos en varias hojas; Conversión por lotes xls, xlsx y PDF...
  • Funciona con Office 2007-2019 y 365, y es compatible con todos los idiomas. Es fácil de implementar en su empresa. Funciones completas de prueba gratuita de 60-day.
pestaña kte 201905

Office Tab lleva la interfaz con pestañas a Office y hace que su trabajo sea mucho más fácil

  • Habilitar la edición y lectura con pestañas en Word, Excel, PowerPoint, Editor, Acceso, Visio y Proyecto.
  • Abra y cree varios documentos en nuevas pestañas de la misma ventana, en lugar de en nuevas ventanas.
  • ¡Aumenta tu productividad en un 50% y reduce cientos de clics de ratón por ti todos los días!
fondo officetab
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Alan Elston · 2 years ago
    Hi
    Thanks for a useful Blog. It helped me get the answer I was looking for.
    _................

    I was just wondering if this is acceptable and correct for removing Replace Multiple Spaces With Single Space From Cells:

    Taking your example,

    Formal to be dragged down:
    =Trim(A2)
    ( I do not understand why you have SUBSTITUTE(A2,CHAR(32)," ") instead of just A2 ??? )
    It appear to give the correct results.

    _.....
    Here is one way I would do it using VBA
    Sub TrimRange()
    Let Range("B2:B9").Value = Evaluate("=If({1},TRIM(" & Range("A2:A9").Address & "))")
    End Sub

    Alan