Mid, fonction

Important :  Cet article a été traduit automatiquement, voir l’avertissement. Vous pouvez consulter la version en anglais de cet article ici.

Renvoie une donnée de type Variante (Chaîne) contenant un nombre défini de caractères d’une chaîne.

Syntaxe

Mid ( chaîne, début [longueur ] )

La syntaxe de la fonction Mid comprend les arguments suivants :

Argument

Description

chaîne

Obligatoire. expression de chaîne à partir de laquelle les caractères sont retournés. Si la chaîne contient une valeur Null, Null est renvoyé.

Démarrer

Obligatoire. Long. Position du caractère dans la chaîne qui commence la partie à prendre. Si start est supérieur au nombre de caractères de chaîne, STXT renvoie une chaîne de longueur nulle (« »).

longueur

Facultatif. Variant (Long). Nombre de caractères à retourner. En cas d’omission, ou si est inférieur à la longueur de caractères dans le texte (y compris le caractère situé à Démarrer), tous les caractères à partir de la position de début à la fin de la chaîne sont retournés.


Notes

Pour déterminer le nombre de caractères dans la chaîne, utilisez la fonction NBCAR .

Remarque : Utilisez la fonction MidB d’octets les données contenues dans une chaîne, comme dans les langues à jeu de caractères codés sur deux octets. Au lieu de spécifier le nombre de caractères, les arguments indiquent le nombre d’octets. Pour les exemples de code qui utilise la fonction MidB, consultez le second exemple dans la rubrique d’exemple.

Exemple

Remarque : Exemples suivants illustrent l’utilisation de cette fonction dans une Visual Basic pour le module d’Applications (VBA). Pour plus d’informations sur l’utilisation de VBA, sélectionnez Référence du développeur dans la liste déroulante en regard de recherche et entrez un ou plusieurs termes dans la zone de recherche.

Le premier exemple utilise la fonction Mid pour renvoyer un nombre spécifié de caractères d’une chaîne.

Dim MyString, FirstWord, LastWord, MidWords
MyString = "Mid Function Demo" ' Create text string.
FirstWord = Mid(MyString, 1, 3) ' Returns "Mid".
LastWord = Mid(MyString, 14, 4) ' Returns "Demo".
MidWords = Mid(MyString, 5) ' Returns "Function Demo".

Le second exemple utilisez MidB et une fonction définie par l’utilisateur (MidMbcs) pour renvoyer également des caractères à partir de la chaîne. La différence est que la chaîne d’entrée est ANSI et la longueur en octets.

Function MidMbcs(ByVal str as String, start, length)
MidMbcs = StrConv(MidB(StrConv(str, vbFromUnicode), _
start, length), vbUnicode)
End Function
Dim MyString
MyString = "AbCdEfG"
' Where "A", "C", "E", and "G" are DBCS and "b", "d",
' and "f" are SBCS.
MyNewString = Mid(MyString, 3, 4)
' Returns ""CdEf"
MyNewString = MidB(MyString, 3, 4)
' Returns ""bC"
MyNewString = MidMbcs(MyString, 3, 4)
' Returns "bCd"

Remarque : Avertissement traduction automatique : cet article a été traduit par un ordinateur, sans intervention humaine. Microsoft propose cette traduction automatique pour offrir aux personnes ne maîtrisant pas l’anglais l’accès au contenu relatif aux produits, services et technologies Microsoft. Comme cet article a été traduit automatiquement, il risque de contenir des erreurs de grammaire, de syntaxe ou de terminologie.

Développez vos compétences
Découvrez des formations
Accédez aux nouvelles fonctionnalités en avant-première
Rejoignez le programme Office Insider

Ces informations vous ont-elles été utiles ?

Nous vous remercions pour vos commentaires.

Merci pour vos commentaires. Il serait vraisemblablement utile pour vous de contacter l’un de nos agents du support Office.

×