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
| A | B | C | D | E | |
|---|---|---|---|---|---|
| 1 | Fonction VBA Mid | ||||
| 2 | Fonction Excel STXT | ||||
| 3 | Fonction Caractères | ||||
| 4 | Fonction Substitue() | ||||
| 5 | Fonction Remplacer |
Le résultat
| A | B | C | D | E | |
|---|---|---|---|---|---|
| 1 | Fonction VBA Mid | VBA Mid | Fonction | ||
| 2 | Fonction Excel STXT | Excel STXT | Fonction | ||
| 3 | Fonction Caractères | Caractères | Fonction | ||
| 4 | Fonction Substitue() | Substitue() | Fonction | ||
| 5 | Fonction Remplacer | Remplacer | Fonction |