Menu

Remplacer une chaîne de caractères par le caractère vide [Résolu]

muiigisha 61 Messages postés lundi 25 septembre 2017Date d'inscription 6 décembre 2017 Dernière intervention - 3 nov. 2017 à 16:30 - Dernière réponse : muiigisha 61 Messages postés lundi 25 septembre 2017Date d'inscription 6 décembre 2017 Dernière intervention
- 3 nov. 2017 à 16:52
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

Afficher la suite 

Votre réponse

2 réponses

Meilleure réponse
jordane45 21438 Messages postés mercredi 22 octobre 2003Date d'inscriptionModérateurStatut 21 juin 2018 Dernière intervention - 3 nov. 2017 à 16:38
1
Merci
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


Merci jordane45 1

Avec quelques mots c'est encore mieux Ajouter un commentaire

CCM a aidé 24488 internautes ce mois-ci

muiigisha 61 Messages postés lundi 25 septembre 2017Date d'inscription 6 décembre 2017 Dernière intervention - 3 nov. 2017 à 16:52
Merci Jordane :)
ça marche bien
Un problème de moins pour lundi.

Merci
Commenter la réponse de jordane45