Module
Contents
Index 🔎︎

# Funkce InStrRev [VBA]

Vrátí pozici řetězce v jiném řetězci, přičemž začne z pravé strany řetězce.

Tato funkce nebo konstanta je povolena deklarací Option VBASupport 1 umístěnou před kódem programu.

Funkce InstrRev vrátí pozici, na které nalezne směrem zprava shodný řetězec. Pokud řetězec nenalezne, vrátí funkce 0.

## Syntaxe:

    InStrRev (Text1 As String, Text2 As String [,Začátek As Long] [, Porovnání As Integer])

## Návratová hodnota:

Typu Long

## Parametry:

Text1: Řetězec, který chcete prohledat.

Text2: Řetězec, který chcete najít.

Začátek: Nepovinný číselný výraz, který označuje směrem zleva pozici v řetězci, kde začíná hledání podřetězce. Pokud tento parametr vynecháte, hledání začne na posledním znaku řetězce. Maximální povolená hodnota je 65535.

Porovnání: Nepovinný číselný výraz, který určuje druh porovnání. Hodnota tohoto parametru může být

1: Výchozí hodnota 1 určuje porovnání textů, u kterého není rozlišována velikost písmen.

0: Hodnota 0 určuje binární porovnání, u kterého je rozlišována velikost písmen.

Chcete-li se vyhnout chybám, nenastavujte parametr Porovnání, pokud vynecháte první parametr.

## Chybové kódy:

5 Neplatné volání procedury

## Příklad:

    Sub ExamplePosition

    Dim sInput As String

    Dim iPos As Integer

     sInput = "Kniha leží na stole"

     iPos = InStrRev(sInput,"kniha",10,1) ' Vrátí 1, hledání nerozlišuje velikost písmen

     Print iPos

     iPos = InStrRev(sInput,"kniha",10,0) ' Vrátí 0, hledání rozlišuje velikost písmen

     Print iPos

    End Sub

Související témata

InStr