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 :

Integer

Paramètres :

Start: Expression numérique qui indique la position dans une chaîne d'où démarrera la recherche de la sous-chaîne spécifiée. Si vious omettez ce paramètre, la recherche démarrera à partir du premier caractère de la chaîne. La valeur minimale autorisée est de 1. La valeur maximale autorisée est de 2 147 483 648.

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 facultatif est omis.

Exemple :

Sub ExamplePosition
Dim sInput As String
Dim iPos As Integer
    sInput = "Office"
    iPos = Instr(sInput,"c")
    Print iPos
End Sub