¿Cómo dividir texto en columnas separadas por letra mayúscula en Excel?

Supongamos que tienes un rango de datos y deseas dividir el contenido de las celdas en columnas separadas utilizando la letra mayúscula como se muestra en la siguiente captura de pantalla, ¿tienes alguna buena idea para resolver este problema en Excel?
Dividir texto en columnas separadas por letra mayúscula con fórmulas
Dividir texto en columnas separadas por letra mayúscula con código VBA
Dividir texto en columnas separadas por letra mayúscula con Kutools para Excel
Dividir texto en columnas separadas por letra mayúscula con fórmulas
Si solo hay dos palabras en tus celdas, las siguientes fórmulas te ayudarán a completar esta tarea. Por favor, sigue los pasos a continuación:
1. Introduce esta fórmula matricial: =IZQUIERDA(A2,PEQUEÑO(ENCONTRAR(CARACTER(FILA(INDIRECTO("65:90"))),A2&"ABCDEFGHIJKLMNOPQRSTUVWXYZ"),2)-1) (A2 es la celda que deseas dividir por letra mayúscula) en una celda en blanco adyacente a tus datos, y luego presiona Ctrl + Shift + Enter juntos para obtener la primera palabra, ver captura de pantalla:
2. Luego selecciona C2, y arrastra el controlador de relleno hacia abajo hasta las celdas donde desees aplicar esta fórmula, todas las primeras palabras del rango de celdas se han extraído de una vez, ver captura de pantalla:
3. Continúa ingresando otra fórmula: =REEMPLAZAR(A2,1,LARGO(C2),"") (A2 es la celda que deseas dividir, y C2 es la celda que contiene la primera palabra que has devuelto) en la celda D2, y presiona la tecla Enter para obtener la segunda palabra, ver captura de pantalla:
4. Selecciona la celda D2, arrastra el controlador de relleno hacia abajo hasta las celdas para obtener la segunda palabra, y el contenido de las celdas del rango se ha dividido en dos columnas por la letra mayúscula, ver captura de pantalla:

Descubre la Magia de Excel con Kutools AI
- Ejecución Inteligente: Realiza operaciones en celdas, analiza datos y crea gráficos, todo impulsado por comandos simples.
- Fórmulas Personalizadas: Genera fórmulas adaptadas para optimizar tus flujos de trabajo.
- Codificación VBA: Escribe e implementa código VBA sin esfuerzo.
- Interpretación de Fórmulas: Comprende fórmulas complejas con facilidad.
- Traducción de Texto: Supera las barreras del idioma dentro de tus hojas de cálculo.
Dividir texto en columnas separadas por letra mayúscula con código VBA
Las fórmulas anteriores solo se aplican al valor de celda que contiene dos palabras; si hay múltiples palabras en una celda que necesitan ser divididas, puedes agregar espacios antes de las letras mayúsculas y luego aplicar Texto en Columnas para dividir el contenido de las celdas en columnas separadas por espacio.
Primero, aplica el código VBA para agregar espacios antes de la letra mayúscula para separar las palabras.
1. Mantén presionadas las teclas ALT + F11 para abrir la ventana de Microsoft Visual Basic para Aplicaciones.
2. Haz clic en Insertar > Módulo, y pega el siguiente código en la Ventana de Módulo.
Código VBA: Insertar espacios antes de cada letra mayúscula en una celda
Function SplitWords(ByVal Str As String) As String
'updateby Extendoffice 20151128
Dim I As Integer
SplitWords = Left(Str, 1)
For I = 2 To Len(Trim(Str))
If (Asc(Mid(Str, I, 1)) > 64) And _
(Asc(Mid(Str, I, 1)) < 91) And _
(Mid(Str, I - 1, 1) <> " ") Then _
SplitWords = SplitWords & " "
SplitWords = SplitWords & Mid(Str, I, 1)
Next
End Function
3. Guarda y cierra este código, regresa a la hoja de trabajo, por favor ingresa esta fórmula: =splitwords(A2) en una celda en blanco adyacente a tus datos, ver captura de pantalla:
4. Luego arrastra el controlador de relleno hacia abajo hasta las celdas donde desees aplicar esta fórmula, y los espacios se han insertado antes de cada letra mayúscula para separar el contenido de las celdas, ver captura de pantalla:
5. Y luego deberías copiar y pegar estas celdas de fórmulas como valores para eliminar las fórmulas en otro lugar o en el rango original.
Segundo, aplica la función Texto en Columnas para dividir el contenido de las celdas en columnas separadas por el espacio.
6. Selecciona los valores de las celdas donde has insertado espacios, y haz clic en Datos > Texto en Columnas, en el Paso 1 del Asistente para Convertir Texto en Columnas, selecciona la opción Delimitado, ver captura de pantalla:
7. Luego haz clic en el botón Siguiente, en el Paso 2 del asistente, marca la opción Espacio bajo la sección Delimitadores, ver captura de pantalla:
8. Continúa haciendo clic Siguiente botón, en el Paso 3 del asistente, elige General opción bajo la Formato de datos de columna, y luego selecciona una celda donde deseas colocar los valores divididos haciendo clic botón, ver captura de pantalla:
9. Por último, haz clic en el botón Finalizar, el contenido de las celdas se ha dividido en múltiples columnas como se muestra en la siguiente captura de pantalla:
Dividir texto en columnas separadas por letra mayúscula con Kutools para Excel
Si tienes Kutools para Excel, combinando sus funciones Agregar Texto y Dividir Celdas, puedes manejar esta tarea fácil y cómodamente, por favor sigue los pasos a continuación:
1. Selecciona los datos originales que deseas dividir.
2. Luego haz clic en Kutools > Texto > Agregar Texto, ver captura de pantalla:
3. En el Agregar Texto cuadro de diálogo, por favor escribe la barra espaciadora una vez u otro separador que necesites en el Texto cuadro, y luego elige 1ª letra en mayúscula de la Solo agregar a sección, ver captura de pantalla:
4. Luego haz clic en el botón Aceptar, y se han agregado espacios antes de cada letra mayúscula, ver captura de pantalla:
5. Y luego puedes aplicar la utilidad Dividir Celdas de Kutools para Excel para dividir los valores de las celdas por espacio, manteniendo el rango de datos seleccionado y luego haz clic en Kutools > Combinar y Dividir > Dividir Celdas, ver captura de pantalla:
6. En el cuadro de diálogo Dividir Celdas, selecciona Dividir en Columnas bajo la sección Tipo, y marca Espacio u otros delimitadores que hayas agregado en el Paso 3, ver captura de pantalla:
7. Luego haz clic en Aceptar, y aparecerá un cuadro de diálogo emergente para recordarte que selecciones una celda donde colocar los datos divididos, ver captura de pantalla:
8. Por último, haz clic en el botón Aceptar, y obtendrás el resultado que necesitas, ver captura de pantalla:
¡Descarga y prueba gratis Kutools para Excel ahora!
Las mejores herramientas de productividad para Office
Potencia tus habilidades en Excel con Kutools para Excel y experimenta una eficiencia sin precedentes. Kutools para Excel ofrece más de300 funciones avanzadas para aumentar la productividad y ahorrar tiempo. Haz clic aquí para obtener la función que más necesitas...
Office Tab lleva la interfaz de pestañas a Office y facilita mucho tu trabajo
- Habilita la edición y lectura con pestañas en Word, Excel, PowerPoint, Publisher, Access, Visio y Project.
- Abre y crea varios documentos en nuevas pestañas de la misma ventana, en lugar de nuevas ventanas.
- ¡Aumenta tu productividad en un50% y reduce cientos de clics de ratón cada día!