Discussion :

[Trafalgar93]

Bonjour à toutes et à tous,

J'essaye de construire une macro mais j'ai des difficulté sur un point.
Dans mon fichier, je souhaite recherche dans toute la colonne E la valeur "2.52" et la remplacer par "2".
J'ai recours à l'enregistrement d'une macro pour obtenir le code et j'obtiens:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
Columns("E:E").Select
    Selection.Replace What:="2,52", Replacement:="2", LookAt:=xlPart, _
        SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
        ReplaceFormat:=False

Lorsque je la lance, la macro ne bloque mais et semble fonctionner, sauf que lorsque je vérifie, les valeurs n'ont pas été remplacées.
Pour info, les valeurs sont au format standard, il y a bien des virgules partout et non des points.

Je ne vois pas ce qui pêche....please HELP!!

[ARTURO83]

Bonjour,

Remplacez la virgule par un point

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Columns("E:E").Replace What:="2.52", Replacement:="2", LookAt:=xlPart

Cdlt

[unparia]

Tu cherches des valeurs numériques, pas des chaines de caractères.
Et une caleur numérique décimale s'exprime par un séparateur . et non ,
--->>

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Selection.Replace What:=2.2, Replacement:=2, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=True, _
ReplaceFormat:=False

[Trafalgar93]

merci les gars vous êtes géniaux! je vais clôturer la discussion.