Note: The other languages of the website are Google-translated. Back to English

Extraiga la enésima palabra de la cadena de texto en Excel

Si tiene una lista de cadenas de texto u oraciones, ahora desea extraer la enésima palabra específica de la lista como se muestra a continuación. En este artículo, presentaré algunos métodos para resolver este trabajo en Excel.


Extraiga y obtenga la enésima palabra de la cadena de texto con fórmula

Para hacer frente a esta tarea, puede utilizar una fórmula que combine las funciones TRIM, MID, SUBSTITUTE, REPT y LEN. La sintaxis genérica es:

=TRIM(MID(SUBSTITUTE(string," ",REPT(" ",LEN(string))), (N-1)*LEN(string)+1, LEN(string)))
  • string: La cadena de texto o el valor de celda del que desea extraer una palabra.
  • N: El número de la palabra que desea extraer.

1. Ingrese o copie la siguiente fórmula en una celda en blanco:

=TRIM(MID(SUBSTITUTE(A2," ",REPT(" ",LEN(A2))), (B2-1)*LEN(A2)+1, LEN(A2)))

Nota:: En la fórmula anterior, A2 es la celda que contiene la cadena de texto que desea usar, B2 es el número de la palabra que desea extraer, también se puede ingresar como un número.

2. Luego, arrastre el controlador de relleno hacia las celdas para aplicar esta fórmula, y toda la enésima palabra específica se extrajo como se muestra en la siguiente captura de pantalla:


Explicación de la fórmula:
  • 1. SUSTITUIR (A2, "", REPT ("", LEN (A2))):
  • REPETIR ("", LEN (A2): Esta función REPT se usa para repetir el carácter de espacio por un número específico de veces que es la longitud del texto de la celda A2, esto obtendrá un número de caracteres de espacio;
  • SUSTITUIR (A2, "", REPETIR ("", LEN (A2))): La función SUSTITUIR reemplazará cada carácter de espacio en la celda A2 con muchos caracteres de espacio devueltos por la función REPT, esto obtendrá una cadena de texto con múltiples espacios entre cada palabra.
  • Esta parte se reorganiza como argumento de texto en la función MID.
  • 2. (B2-1)*LEN(A2)+1: Esta fórmula devolverá la posición inicial de la enésima palabra de la cadena de texto en la celda A2. Es el argumento núm_inicial de la función MID.
  • 3. MEDIO (SUSTITUIR (A2, "", REPT ("", LEN (A2))), (B2-1) * LEN (A2) +1, LEN (A2)): Esta función MID extrae la enésima palabra de la cadena de texto en la celda A2 según los argumentos que devuelven las fórmulas anteriores.
  • 4. RECORTAR (): Esta función TRIM elimina todos los espacios adicionales entre las palabras.

Consejos: Si hay varios espacios entre las palabras, la fórmula anterior no funcionará correctamente, en este caso, debe anidar otra función TRIM dentro de la función SUSTITUIR, aplique la siguiente fórmula:

=TRIM(MID(SUBSTITUTE(TRIM(A2)," ",REPT(" ",LEN(A2))), (B2-1)*LEN(A2)+1, LEN(A2)))


Extraiga y obtenga la enésima palabra de la cadena de texto con la función definida por el usuario

Si la fórmula anterior es un poco difícil de entender para usted, aquí, presentaré una función definida por el usuario, con el siguiente código, también puede extraer la enésima palabra de una cadena de texto. Haz lo siguiente:

1. presione el ALT + F11 teclas para abrir el Microsoft Visual Basic para aplicaciones ventana.

2. Hacer clic recuadro > Módulo, copie y pegue el siguiente código en la ventana Módulo.

Function FindWord(Source As String, Position As Integer)
'Update by Extendoffice
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. Luego, guarde y cierre el módulo de código, ingrese esta fórmula: = palabra de búsqueda (A2, B2) en una celda en blanco donde desea generar el resultado:

Nota:: En esta fórmula, A2 es la celda que contiene la cadena de texto que desea usar, B2 es el número de la palabra que desea extraer, también se puede ingresar como un número.

4. Y luego, arrastre la fórmula a otras celdas para obtener el resultado que necesite, vea la captura de pantalla:


Extraiga y obtenga la enésima palabra de la cadena de texto con una función poderosa

Si tiene Kutools for Excel, admite múltiples fórmulas de uso común para la mayoría de los usuarios de Excel, con su Extrae la enésima palabra en la celda utilidad, puede extraer la enésima palabra que especificó lo más rápido posible. ¡Haga clic para descargar Kutools for Excel para una prueba gratuita!


Funciones relativas utilizadas:

  • REPT:
  • La función REPT se utiliza para repetir los caracteres un número específico de veces.
  • SUBSTITUTE:
  • La función SUSTITUIR reemplaza texto o caracteres dentro de una cadena de texto con otro texto o caracteres.
  • TRIM:
  • La función TRIM elimina todos los espacios adicionales de la cadena de texto y solo mantiene espacios simples entre palabras.
  • MID:
  • La función MID devuelve los caracteres específicos del medio de la cadena de texto.
  • LEN:
  • La función LEN devuelve el número de caracteres en una cadena de texto.

Más artículos:


Las mejores herramientas de productividad de oficina

Kutools para Excel: te ayuda a destacar entre la multitud

¿Le gustaría completar su trabajo diario de forma rápida y perfecta? Kutools for Excel ofrece 300 potentes funciones avanzadas (combinar libros de trabajo, sumar por color, dividir contenido de celdas, convertir fecha, etc.) y ahorrarle un 80% de tiempo.

  • Diseñado para 1500 escenarios de trabajo, te ayuda a resolver el 80% de problemas de Excel.
  • Reduzca miles de clics de teclado y mouse todos los días, alivie sus ojos y manos cansados.
  • Conviértete en un experto en Excel en 3 minutos. Ya no es necesario recordar fórmulas dolorosas y códigos VBA.
  • Prueba gratuita ilimitada de 30 días. Garantía de devolución de dinero de 60 días. Actualización y soporte gratuitos durante 2 años.
Cinta de Excel (con Kutools para Excel instalado)

Ficha Office: habilite la lectura y edición con pestañas en Microsoft Office (incluya Excel)

  • ¡Un segundo para cambiar entre docenas de documentos abiertos!
  • Reduzca cientos de clics del mouse para usted todos los días, diga adiós a la mano del mouse.
  • Aumenta su productividad en un 50% al ver y editar varios documentos.
  • Trae pestañas eficientes a Office (incluye Excel), al igual que Chrome, Firefox y el nuevo Internet Explorer.
Captura de pantalla de Excel (con la pestaña Office instalada)
Comentarios (0)
Aún no hay calificaciones. ¡Sé el primero en calificar!
No hay comentarios publicados aquí todavía
Deje sus comentarios
Publicar como invitado
×
Califica esta publicación:
0   Personajes
Ubicaciones sugeridas

Seguinos

Copyright © 2009 - www.extendoffice.com. | Reservados todos los derechos. Energizado por ExtendOffice, | Mapa del Sitio
Microsoft y el logotipo de Office son marcas comerciales o marcas comerciales registradas de Microsoft Corporation en los Estados Unidos y / o en otros países.
Protegido por Sectigo SSL