Remplacer une chaîne de caractères par le caractère vide

[Résolu/Fermé]
Signaler
Messages postés
61
Date d'inscription
lundi 25 septembre 2017
Statut
Membre
Dernière intervention
6 décembre 2017
-
Messages postés
61
Date d'inscription
lundi 25 septembre 2017
Statut
Membre
Dernière intervention
6 décembre 2017
-
Bonjour,
je voudrais éviter d'utiliser des boucles (car il y'en a tellement dans mon code)...cependant j'arrive pas à remplacer dans toute ma feuille de calcul la chaine de caractères voulue par le caractère vide.
Voici mon bout de code ci-dessous

Cells.Replace What:="EST" Or "EDT", Replacement:="", LookAt:= _
xlPart, SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False

j'avoue que j'ai trouvé sur le net et j'ai juste adapté (court et que je croyais simple) mais lors de la compilation j'ai l'erreur 13 type mismatch qui est généré.

Bon weekend
Merci d'avance

1 réponse

Messages postés
33673
Date d'inscription
mercredi 22 octobre 2003
Statut
Modérateur
Dernière intervention
15 octobre 2021
3 759
Bonjour,

Sub test()


Cells.Replace What:="EST", Replacement:="", LookAt:= _
        xlPart, SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
        ReplaceFormat:=False

Cells.Replace What:="EDT", Replacement:="", LookAt:= _
        xlPart, SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
        ReplaceFormat:=False
End Sub


2
Merci

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

CCM 41713 internautes nous ont dit merci ce mois-ci

Messages postés
61
Date d'inscription
lundi 25 septembre 2017
Statut
Membre
Dernière intervention
6 décembre 2017

Merci Jordane :)
ça marche bien
Un problème de moins pour lundi.

Merci