Funció InStrRev [VBA]
Retorna la posició d'una cadena dins una altra cadena, començant pel costat dret.
La funció InStrRev retorna la posició a la quan s'ha trobat la coincidència, des de la dreta. Si no s'ha trobat la cadena, la funció retorna 0.
InStrRev (Text1 As String, Text2 As String [,Start As Long] [, Compare As Integer])
Long
Text1: qualsevol expressió de cadena que vulgueu cercar.
Text2: qualsevol expressió de cadena que vulgueu cercar.
Start: Optional numeric expression that marks the position from the left in a string where the search for the specified substring starts. If you omit this parameter, the search starts at the last character of the string. The maximum allowed value is 65535.
Compare: Optional numeric expression that defines the type of comparison. The value of this parameter can be
1: The default value of 1 specifies a text comparison that is not case-sensitive.
0: The value of 0 specifies a binary comparison that is case-sensitive.
To avoid a run-time error, do not set the Compare parameter if the first return parameter is omitted.
Sub ExamplePosition
Dim sInput As String
Dim iPos As Integer
sInput = "El llibre és a la taula"
iPos = InStrRev(sInput,"the",10,1) ' Returns 1, search is case-insensitive
Print iPos
iPos = InStrRev(sInput,"the",10,0) ' Returns 0, search is case-sensitive
Print iPos
End Sub