Función InStrRev [VBA]
Devuelve la posición de una cadena dentro de otra cadena, comenzando por el extremo derecho de la cadena.
La función InStrRev devuelve la posición en la que se encontró la coincidencia, a partir de la derecha. Si no se encuentra la cadena, la función devuelve 0.
InStrRev (Texto1 As String, Texto2 As String [,Start As Long] [, Compare As Integer])
Long
Text1: la expresión de cadena que se desee buscar.
Text2: la expresión de cadena que se desee buscar.
Start: expresión numérica opcional que indica la posición a partir de la izquierda en una cadena en la que da comienzo la búsqueda de la subcadena especificada. Si este parámetro se omite, la búsqueda comienza desde el primer carácter de la cadena. El valor máximo es 65535.
Compare: expresión numérica opcional que define el tipo de comparación. El valor de este parámetro puede ser
1: el valor predeterminado 1 establece que la comparación no distingue entre minúsculas y mayúsculas.
0: el valor 0 especifica una comparación binaria que distingue entre minúsculas y mayúsculas.
Para evitar un error en tiempo de ejecución, no defina el parámetro Comparación si se omite el primer parámetro de retorno.
Sub ExamplePosition
Dim sInput As String
Dim iPos As Integer
sInput = "El libro está sobre la mesa"
iPos = InStrRev(sInput,"el",10,1) ' Devuelve 1; la búsqueda no distingue mayúsculas y minúsculas
Print iPos
iPos = InStrRev(sInput,"el",10,0) ' Devuelve 0; la búsqueda distingue mayúsculas y minúsculas
Print iPos
End Sub