Funciones para manejo de texto
=Left(Texto,NChar)
Esta función permite extraer los primeros "NChar" caracteres de la cadena "Texto"
=Right(Texto, NChar)
Contrario a la anterior, esta función permite extraer de la cadena "Texto", los úiltimos "NChar" caracteres.
=Mid(Texto, Init, NChar)
Esta función permite extraer de Texto, "NChar" caracteres a partir del carácter "Init"
=Instr(Texto1, Texto2,[Inicial])
Esta función devuelve la posición inicial en que se encuentra la cadena Texto2, dentro de la cadena Texto1. Esto lo hace examinando a partir de la posición Inicial.
Ejemplo
Sub Apellidos_Y_Nombres()
Texto = InputBox("Ingresa tus apellidos y nombres (Ap Am, Nombres)")
ApPaterno = Left(Texto, InStr(Texto, " "))
ApMaterno = Mid(Texto, InStr(Texto, " "), Len(Texto) - InStr(Texto, ",") - 6)
Nombres = Right(Texto, Len(Texto) - InStr(Texto, ","))
MsgBox ApPaterno
MsgBox ApMaterno
MsgBox Nombres
End Sub
Síguenos en: Facebook Sobre aulaClic Política de Cookies