Catégories
Macro VBA Recherche Macros VBA

VBA Replace() : macro pour remplacer une chaîne par une autre

Partager :

La fonction Replace dans VBA est utilisée dans les macros pour remplacer une chaîne par une autre. Cette fonction tient compte de la casse, donc des caractères majuscules et minuscules.

La fonction Replace

La fonction VBA Replace suit la syntaxe suivante :

Replace(variable,chercher,remplacer,position, nb, comparer)

où :

  • variable correspond à la chaine à analyser
  • chercher correspond au caractère ou à la sous-chaine à chercher
  • remplacer correspond à la chaine de remplacement
  • position désigne le numéro de caractère à partir duquel effectuer la recherche
  • nb correspond au nombre de remplacements. Si rien est indiqué, alors toutes les occurences sont remplacées
  • comparer correspond au type de comparaison à réaliser et peut prendre les valeurs suivantes :
    • vbUseCompareOption : comparaison avec l'option Comparer
    • vbBinaryCompare : comparaison binaire
    • vbTextCompare : comparaison textuelle

Exemple de macro avec Replace

La macro

Sub nommacro()

Dim i As Integer

For i = 1 To 5

'Résultat dans Ligne de 1 à 5, Colonne 2
Cells(i, 2).Value = Replace(Cells(i, 1), " ", " --- ")

'Résultat dans Ligne de 1 à 5, Colonne 3
Cells(i, 3).Value = Replace(Cells(i, 1), "Fonction ", "")

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 MidFonction --- VBA --- MidVBA Mid
2Fonction Excel STXTFonction --- Excel --- STXTExcel STXT
3Fonction CaractèresFonction --- CaractèresCaractères
4Fonction Substitue()Fonction --- Substitue()Substitue()
5Fonction RemplacerFonction --- RemplacerRemplacer
La fonction Replace tient compte de la casse, donc des caractères majuscules et minuscules.