Excel - Equivalencia función Encontrar en VBA

 
Vista:

Equivalencia función Encontrar en VBA

Publicado por Pablo (20 intervenciones) el 24/02/2015 13:33:07
¿Cual es el equivalente de la función ENCONTRAR de Excel en VBA?

Ejemplo:

Si tengo una cadena de texto tal que MADRID-TOLEDO y quiero saber qué hay después del guión haré algo así:

1
= DERECHA  ( A1 ; LARGO ( A1 ) - ENCONTRAR ( "-" ; A1 ;1)  )

Y esto me determina la posición del quión en el string y a partir de él puedo obtener la parte de la cadena de texto que me interesa.

¿Cómo puedo hacer esto en VBA?
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

Equivalencia función Encontrar en VBA

Publicado por Legarda (68 intervenciones) el 24/02/2015 15:07:59
Buenos días
Seria algo así

Cuento el numero de caracteres
Ncaracteres = Len(Cadenadetexto)

consulto la ubicación del guión
UbicacionGuion = InStr(Cadenadetexto, "-")

Resto la ubicación del guión con el total de caracteres
Rango = Ncaracteres - UbicacionGuion

y el resultado es el fragmento de la cadena de texto
Resultado = Mid(Cadenadetexto, UbicacionGuion, Rango + 1)

utilícelo como lo necesite
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

Equivalencia función Encontrar en VBA

Publicado por Pablo (20 intervenciones) el 24/02/2015 17:43:00
¡Gracias Legarda!

InStr es la función que buscaba.

¿Sabes dónde puedo consultar otras equivalencias?
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar