Fonction InStr

Renvoie la position d'une chaîne de caractères dans une autre chaîne de caractères.

La fonction Instr renvoie la position où la correspondance a été trouvée. Si la chaîne de caractères n'a pas été trouvée, la fonction renvoie 0.

Syntaxe :

InStr ([Start As Long,] Text1 As String, Text2 As String[, Compare])

Valeur de retour :

Nombre entier

Paramètres :

Start : expression numérique permettant de repérer dans une chaîne la position du début de la recherche de la sous-chaîne spécifiée. Si ce paramètre est omis, la recherche commence au premier caractère de la chaîne. La valeur maximale autorisée est 65 535.

Text1 : expression au format chaîne de caractères dans laquelle la recherche est effectuée.

Text2 : expression au format chaîne de caractères à rechercher.

Compare : expression numérique facultative définissant le type de comparaison. La valeur de ce paramètre peut être 0 ou 1. La valeur par défaut (1) spécifie une comparaison de texte qui ne tient pas compte de la casse. La valeur 0 spécifie une comparaison binaire sensible à la casse.

Pour éviter une erreur d'exécution, ne définissez pas le paramètre Compare si le premier paramètre de retour est omis.

Exemple :

Sub ExamplePosition

Dim sInput As String

Dim iPos As Integer

    sInput = "Office"

    iPos = Instr(sInput,"c")

    Print iPos

End Sub