Enregistrement macro

bonjour,

j'ai enregistrer une macro pour remplacer supprimer les points

en utilisant ctrl f et remplacer . par ""le résulat est bon et enlève également la virgule et les 000 derriere

par contre la macro elle ne supprime pas la virgule et les 000 derrière !!?

curieux car j'enregistre une macro qui ne fait pas exactement ce que j'ai enregistré

avez vous une idée

cordialement

Columns("A:A").Select
    Selection.Replace What:=".", Replacement:="", LookAt:=xlPart, _
        SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
        ReplaceFormat:=False

Bonjour

Sub Point()
Application.ScreenUpdating = False
Range("A:A").NumberFormat = 0
For Each cel In Range("A1:A" & Range("A" & Rows.Count).End(xlUp).Row)
    cel.Value = Replace(cel.Value, ".", "") * 1
Next cel
End Sub

Cordialement

10yoda.zip (8.77 Ko)

merci Amadeus

c'est comme d'habitude =>parfait !!

merci de ton aide

Rechercher des sujets similaires à "enregistrement macro"