¿Cómo extraer la primera, la última o la enésima palabra de una cadena de texto en Excel?

Si necesita extraer la primera palabra de una lista de cadenas de texto, las fórmulas siguientes le serán de gran ayuda.

Para extraer la primera palabra, introduzca la siguiente fórmula en una celda vacía y, a continuación, arrastre el controlador de autorrelleno hasta el rango que necesite.

=IF(ISERR(FIND(« »,A2)),«»,LEFT(A2,FIND(« »,A2)-1))

Para extraer la última palabra de cada celda, aplique esta fórmula:

=IF(ISERR(FIND(« »,A2)),«»,RIGHT(A2,LEN(A2)-FIND(«*»,SUBSTITUTE(A2,« »,«*»,LEN(A2)-LEN(SUBSTITUTE(A2,« »,«»))))))

Y ahora verá que se ha extraído la primera o la última palabra de cada celda.

Notas: En las fórmulas anteriores, A2 indica la celda de la que extraerá la primera o la última palabra.

¿Le resulta difícil memorizar fórmulas largas y complicadas? ¡Una herramienta increíble le ayuda a extraer la enésima palabra con solo unos pocos clics!

Las fórmulas anteriores solo permiten extraer la primera y la última palabra, pero no una palabra específica (como la segunda, la sexta, etc.). Incluso si logra encontrar fórmulas que resuelvan este problema, serán demasiado complejas para memorizarlas y aplicarlas con facilidad. Por eso, le recomendamos la función **Extraer la N-ésima palabra de una celda** de Kutools para Excel, que le permite obtener la enésima palabra de la manera más sencilla posible.

Si desea extraer la segunda, tercera o cualquier enésima palabra de una cadena de texto, puede crear una función definida por el usuario para lograrlo.

1. Mantenga pulsadas las teclas ALT + F11 para abrir la ventana Microsoft Visual Basic para Aplicaciones.

2. Haga clic en Insertar > Módulo y pegue el siguiente código en la ventana del Módulo.

Function FindWord(Source As String, Position As Integer)
'Update 20131202
Dim arr() As String
arr = VBA.Split(Source, " ")
xCount = UBound(arr)
If xCount < 1 Or (Position - 1) > xCount Or Position < 0 Then
    FindWord = ""
Else
    FindWord = arr(Position - 1)
End If
End Function

3. A continuación, guarde el código. En este ejemplo, obtendré la tercera palabra de la cadena, así que escribiré la fórmula =findword(A2,3) en una celda vacía (B2) y, después, arrastraré el controlador de autorrelleno de dicha celda al rango que necesite. ¡Mire la captura de pantalla!

Nota: En la fórmula anterior, A2 es la celda de la que desea extraer la palabra; el número 3 indica la tercera palabra de la cadena que se extraerá, y puede ajustar ambos valores según sus necesidades.

Este método presenta la utilidad Dividir celdas de Kutools para Excel, que te permite extraer cada palabra de celdas con cadenas de texto y mostrarlas después de forma horizontal o vertical, según tus necesidades.

1. Seleccione las celdas que contienen las cadenas de texto de las que desea extraer palabras y haga clic en Kutools > Combinar y dividir > Dividir celdas.

2. En el cuadro de diálogo Dividir celdas que se abre, especifique el tipo de división en la sección Tipo, active la opción Espacio en la sección Separador y haga clic en el botón Aceptar. Vea la captura de pantalla:

3. Ahora, especifique el rango de destino donde desea colocar las palabras extraídas y haga clic en el botón Aceptar.

Si marcó la opción Dividir en columnas en el cuadro de diálogo Dividir celdas anterior, cada palabra se extraerá de la cadena de texto y se mostrará verticalmente.

Si marcó la opción Dividir en filas en el cuadro de diálogo Dividir celdas anterior, cada palabra se extraerá de la cadena de texto y se mostrará horizontalmente.

Si tiene instalado Kutools para Excel, puede utilizar su función Asistente de fórmulas > Extraer la N-ésima palabra de una celda para extraer rápidamente la enésima palabra de la celda especificada de forma sencilla.

1. Seleccione la celda en la que desea insertar la palabra extraída y haga clic en Kutools > Asistente de fórmulas > Asistente de fórmulas para activar esta función.

2. En el cuadro de diálogo Asistente de fórmulas, siga estos pasos:
(1) Seleccione Texto en el menú desplegable Tipo de fórmula;
(2) Haga clic para resaltar Extraer la N-ésima palabra de una celda en el cuadro de lista Selecciona una fórmula;
(3) En el cuadro Celda, especifique la celda de la que desea extraer la palabra;
(4) En el cuadro Enésima, indique el número correspondiente.

3. Haga clic en el botón Aceptar. Si es necesario, arrastre el controlador de autorrelleno de la celda que contiene la fórmula y cópiela en otras celdas.