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

Résolu
muiigisha Messages postés 61 Date d'inscription   Statut Membre Dernière intervention   -  
muiigisha Messages postés 61 Date d'inscription   Statut Membre Dernière intervention   -
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

jordane45 Messages postés 38486 Date d'inscription   Statut Modérateur Dernière intervention   4 752
 
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
muiigisha Messages postés 61 Date d'inscription   Statut Membre Dernière intervention  
 
Merci Jordane :)
ça marche bien
Un problème de moins pour lundi.

Merci
0