Supongamos que tiene una hoja de cálculo con una lista larga de nombres que tienen el formato "Apellido Nombre", y ahora necesita reorganizar todos los nombres en "Nombre, Apellido". ¿Cómo lograrlo? Este artículo presentará tres métodos para ayudarlo a resolver el problema.
Reorganizar el texto en una celda con fórmula
Reorganizar el texto en una celda con código VBA
Reorganice rápidamente el texto en una celda con Kutools para Excel
La siguiente fórmula puede ayudarlo a cambiar el apellido y el nombre en una celda en Excel. Haz lo siguiente.
1. Seleccione una celda en blanco para generar el texto reordenado, ingrese la siguiente fórmula y luego presione la tecla Enter.
= TRIM (MID (b2, SEARCH ("", b2) +1,250)) & "" & LEFT (b2, SEARCH ("", b2) -1)
Nota:: en la fórmula, B2 es la celda que contiene el nombre que reorganizará. Cámbielo según sus necesidades.
2. Siga seleccionando la celda de resultado, arrastre el controlador de relleno hacia abajo para voltear todos los nombres como se muestra a continuación.
Reorganice fácilmente el texto en una celda en Excel:
La Texto inverso utilidad de Kutools for Excel puede ayudarlo a intercambiar fácilmente texto dentro de una celda con cierto separador en Excel. Vea la siguiente captura de pantalla:
¡Descárgalo y pruébalo! (Sendero gratuito de 30 días)
Además, puede aplicar el siguiente código VBA para voltear todos los nombres en una lista a la vez en Excel. Haz lo siguiente.
1. presione el otro + F11 teclas para abrir el Microsoft Visual Basic para aplicaciones ventana.
2. En el Microsoft Visual Basic para aplicaciones ventana, haga clic recuadro > Módulo. Luego, copie el código VAB a continuación en la ventana del Módulo.
Código de VBA: reorganizar el texto en una celda
Sub RearrangeText() 'Updated by Extendoffice 20180503 Dim xRg As Range, yRg As Range Dim LastRow As Long, i As Long Dim strTxt As String, strFs As String Dim strLs As String, N As Integer On Error Resume Next Set xRg = Application.InputBox(Prompt:="Range Selection:", _ Title:="Kutools for excel", Type:=8) For Each yRg In xRg On Error Resume Next strTxt = yRg.Value Trim (strTxt) N = InStr(strTxt, " ") strLs = Left(strTxt, N - 1) strFs = Right(strTxt, Len(strTxt) - N) yRg.Value = strFs & " " & strLs Next End Sub
3. Entonces un Kutools for Excel aparece el cuadro de diálogo, seleccione la lista de nombres que desea reorganizar y luego haga clic en el OK botón. Ver captura de pantalla:
Luego, todos los "Apellidos Nombre" en la lista seleccionada se invierten inmediatamente.
Esta sección presentará el Orden de texto inverso utilidad de Kutools for Excel para ayudarlo a reorganizar el texto en una celda.
Antes de aplicar Kutools for Excel, Por favor descargarlo e instalarlo en primer lugar.
1. Seleccione la lista de nombres, le dará la vuelta al "Apellido Nombre", luego haga clic en Kutools > Texto > Orden de texto inverso. Ver captura de pantalla:
2. En el Texto inverso cuadro de diálogo, seleccione el Espacio opción y luego haga clic en OK botón. Ver captura de pantalla:
Luego, todos los nombres de la lista seleccionada se reorganizan a la vez.
Si desea tener una prueba gratuita (30 días) de esta utilidad, haga clic para descargarloy luego vaya a aplicar la operación según los pasos anteriores.
