Catégories
Macro pour extraire Macro VBA Caractères Macros VBA

VBA Mid() : macro pour extraire les caractères d’une chaine

Partager :

La fonction Mid dans VBA est utilisée pour extraire les caractères d'une chaine ou d'une cellule. STXT est la fonction Excel correspondante.

La fonction Mid

La fonction VBA Mid suit la syntaxe suivante :

Mid(variable, position_depart, longueur)

où :

  • variable désigne la cellule ou la chaine de caractère à traiter
  • position_depart désigne le numéro de position à partir de laquelle extraire la chaine de caractères
  • longueur est un argument facultatif et désigne le nombre de caractères à extraire

Exemple de macro avec Mid

La macro

Sub nommacro()

Dim i As Integer

For i = 1 To 5

'Résultat dans Ligne de 1 à 5, Colonne 2 - extrait à partir du 10ème caractère sans limite de nombres
Cells(i, 2).Value = Mid(Cells(i, 1), 10)

'Résultat dans Ligne de 1 à 5, Colonne 3 - extrait du 1er au 8ème caractère
Cells(i, 3).Value = Mid(Cells(i, 1), 1, 8)

Next i

End Sub

Les données sources

ABCDE
1Fonction VBA Mid
2Fonction Excel STXT
3Fonction Caractères
4Fonction Substitue()
5Fonction Remplacer

Le résultat

ABCDE
1Fonction VBA MidVBA MidFonction
2Fonction Excel STXTExcel STXTFonction
3Fonction CaractèresCaractèresFonction
4Fonction Substitue()Substitue()Fonction
5Fonction RemplacerRemplacerFonction