Como separar NOMBRES y APELLIDOS con UDF en Excel

 Aquí te dejo un UDF para separar los nombres y apellidos en Excel:

La dificultad principal para separar nombres y apellidos en Excel es la cantidad de variantes que pueden existir en los nombres de las personas lo cual hace necesario analizar cada caso específico para utilizar el procedimiento adecuado:

y para eso necesitamos realizar ciertos procedimientos, a continuación te presento:

Paso 1: Abre un libro de excel y abrir el editor de con el teclado ALT + F11, insertamos un módulo y pegamos el siguiente código:

'Function NOMBRE(AP As Range) As String
'Dim nombreArr() As String
'Dim nuevaCadena As String
'Dim i As Integer
'nombreArr = Split(Trim(AP.Value))
'For i = 0 To UBound(nombreArr)
'    Select Case LCase(nombreArr(i))
'        Case "de", "del", "la", "las", "los", "san"
'            nuevaCadena = nuevaCadena & nombreArr(i) & " "
'        Case Else
'            nuevaCadena = nuevaCadena & nombreArr(i) & "|"
'    End Select
'Next
'If Right(nuevaCadena, 1) = "|" Then
'    nuevaCadena = Left(nuevaCadena, Len(nuevaCadena) - 1)
'End If
'NOMBRE = nuevaCadena
'End Function

 Paso 2: Ve en la hoja de cálculo y anota esta formula en cualquier celda vacía:

NOMBRE (seleccione la celda que quieres separar)

Con el resultado obtenido hay que darle copiado y pegado de valores y posteriormente usar la función TEXTOS EN COLUMNAS.

Listo...