Urgente, necesito separar...
¿Hola Leo como estas?
Oye una pregunta, como puedo hacerle para que de un nombre completo "Antonio de Jesús Perez Gallardo", me separe el apellido paterno, materno y nombre, ¿en campos de una tabla?
Gracias, es urgente!
Oye una pregunta, como puedo hacerle para que de un nombre completo "Antonio de Jesús Perez Gallardo", me separe el apellido paterno, materno y nombre, ¿en campos de una tabla?
Gracias, es urgente!
1 Respuesta
Respuesta de leosoft
1
Lo puedes hacer de esta manera:
texto = "Antonio de Jesus Perez Gallardo"
paso = 0
For a = 1 To Len(texto)
pos = Len(texto) - (a - 1)
Select Case paso
Case 0
If Mid(texto, pos, 1) = " " Then
paso = 1
Else
paterno = Mid(texto, pos, 1) & paterno
End If
Case 1
If Mid(texto, pos, 1) = " " Then
paso = 2
Else
materno = Mid(texto, pos, 1) & materno
End If
Case 2
nombre = Mid(texto, pos, 1) & nombre
End Select
Next
Fíjate que en Materno, Paterno y Nombre te quedaría el nombre saparado.
texto = "Antonio de Jesus Perez Gallardo"
paso = 0
For a = 1 To Len(texto)
pos = Len(texto) - (a - 1)
Select Case paso
Case 0
If Mid(texto, pos, 1) = " " Then
paso = 1
Else
paterno = Mid(texto, pos, 1) & paterno
End If
Case 1
If Mid(texto, pos, 1) = " " Then
paso = 2
Else
materno = Mid(texto, pos, 1) & materno
End If
Case 2
nombre = Mid(texto, pos, 1) & nombre
End Select
Next
Fíjate que en Materno, Paterno y Nombre te quedaría el nombre saparado.
