Microsoft 365 Bouton remplacer caractère dans une feuille

[azerty64]

Bonjour à tous,

J'ai besoin de vous pour créer un bouton permettant de changer les points "." en virgule "," dans une feuille entière.
Pouvez vous m'aider ?
Merci d'avance

Cordialement,
azerty64

 

[sylvanu]

Bonjour Azerty,
En utilisant l'enregistreur de macro et en bidouillant :

Sub RemplacePointParVirgule()
    Cells.Select
    Selection.Replace What:=".", Replacement:=",", LookAt:=xlPart, _
        SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
        ReplaceFormat:=False
    [A1].Select
End Sub

 

[azerty64]

Bonjour @sylvanu,

Encore un grand merci, ca marche nickel

Cordialement,
azerty64