¿Cómo extraer iniciales de nombres en Excel?
Cuando estás procesando registros de clientes o realizando combinaciones de correspondencia, obtener iniciales de un nombre puede ser útil para ti; por ejemplo, HG para Hal Greer. Así que aquí te presento algunos trucos para que puedas extraer rápidamente las iniciales de una lista de nombres en Excel.
Extraer iniciales con fórmula en Excel
Extraer iniciales usando una Función Definida en Excel
Extraer iniciales con fórmula en Excel
El primer método consiste en usar una fórmula para extraer iniciales de nombres en Microsoft Excel.
Selecciona una celda en blanco, por ejemplo, Celda C2, escribe esta fórmula =IZQUIERDA(A2)&SI(ESNUMERO(ENCONTRAR(" ",A2)),EXTRAE(A2,ENCONTRAR(" ",A2)+1,1),"")&SI(ESNUMERO(ENCONTRAR(" ",A2,ENCONTRAR(" ",A2)+1)),EXTRAE(A2,ENCONTRAR(" ",A2,ENCONTRAR(" ",A2)+1)+1,1),"") (A2 es la primera celda de tu lista de nombres), presiona el botón Enter, luego arrastra el controlador de relleno para completar el rango. Ahora verás que se han extraído todas las iniciales de cada nombre de la lista.
Extraer iniciales usando una Función Definida en Excel
Además de la fórmula, puedes usar la Función Definida para extraer fácilmente iniciales de nombres específicos en Microsoft Excel.
1. Selecciona una celda de la columna que deseas seleccionar y presiona Alt + F11 para abrir la ventana de Microsoft Visual Basic para Aplicaciones.
2. En la ventana emergente, haz clic en Insertar > Módulo, luego pega el siguiente código VBA en el módulo.
VBA: Extraer iniciales de nombres
Function FirstCharacters(pWorkRng As Range) As String
'Updateby20140514
Dim arr As Variant
Dim xValue As String
Dim OutValue As String
xValue = pWorkRng.Value
arr = VBA.Split(Trim(xValue))
For i = 0 To UBound(arr)
OutValue = OutValue & VBA.Left(arr(i), 1) & "."
Next
FirstCharacters = OutValue
End Function3. Guarda el código y cierra la ventana, selecciona una celda en blanco y escribe esta fórmula = PrimerosCaracteres(A2), luego presiona el botón Enter, y arrastra el controlador de relleno para completar el rango que desees. Después de eso, podrás ver que se han extraído las iniciales de cada nombre.
Consejo: Puedes cambiar los separadores "." de las iniciales según sea necesario en el VBA anterior.
Artículos Relacionados:
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!