Comment utiliser Rechercher et remplacer dans VBA (avec exemples)

Vous pouvez utiliser les méthodes suivantes pour rechercher et remplacer des chaînes spécifiques dans une plage à l’aide de VBA :

Méthode 1 : Rechercher et remplacer des chaînes (insensible à la casse)

Sub FindReplace()
Range("A1:B10").Replace What:="Mavs", Replacement:="Mavericks"
End Sub

Cette macro particulière remplacera chaque occurrence de « Mavs » par « Mavericks » dans la plage A1:B10 .

Méthode 2 : rechercher et remplacer des chaînes (sensible à la casse)

Sub FindReplace()
Range("A1:B10").Replace What:="Mavs", Replacement:="Mavericks", MatchCase:=True
End Sub

Cette macro particulière remplacera chaque occurrence de « Mavs » par « Mavericks » dans la plage A1:B10 uniquement si la casse correspond .

Par exemple, la chaîne « mavs » ne serait pas remplacée car elle ne correspond pas précisément à la casse de « Mavs ».

Les exemples suivants montrent comment utiliser cette méthode en pratique avec l’ensemble de données suivant dans Excel :

Exemple 1 : rechercher et remplacer des chaînes à l’aide de VBA (insensible à la casse)

Supposons que nous souhaitions remplacer chaque occurrence de « Mavs » par « Mavericks » dans la plage A1:B10 .

Nous pouvons créer la macro suivante pour ce faire :

Sub FindReplace()
Range("A1:B10").Replace What:="Mavs", Replacement:="Mavericks"
End Sub

Lorsque nous exécutons cette macro, nous recevons les résultats suivants :

Notez que chaque occurrence de « Mavs » a été remplacée par la chaîne « Mavericks » dans la colonne équipe.

Exemple 2 : rechercher et remplacer des chaînes à l’aide de VBA (sensible à la casse)

Supposons que nous souhaitions remplacer chaque occurrence de « Mavs » par « Mavericks » dans la plage A1:B10 uniquement si la casse correspond à .

Nous pouvons créer la macro suivante pour ce faire :

Sub FindReplace()
Range("A1:B10").Replace What:="Mavs", Replacement:="Mavericks", MatchCase:=True
End Sub

Lorsque nous exécutons cette macro, nous recevons le résultat suivant :

Notez que ce remplacement est sensible à la casse .

Cela signifie que chaque occurrence de « Mavs » est remplacée mais que chaque occurrence de « mavs » est laissée seule.

Ressources additionnelles

Les didacticiels suivants expliquent comment effectuer d’autres tâches courantes à l’aide de VBA :

VBA : Comment compter les occurrences de caractères dans une chaîne
VBA : comment vérifier si une chaîne contient une autre chaîne
VBA : Comment compter les cellules avec un texte spécifique