Inverser les points et les virgules

[Trempass]

Bonjour à tous, (enfin, ceux qui ne sont pas sur la plage)

Il me serait agréable de pouvoir changer les virgules par des points, d'un tableau du genre :

654234,47 88834,74
654212,60 88824,23
654215,85 88815,12
654224,45 88819,00
654231,37 88803,79
654220,93 88798,92
654243,72 88819,31
654235,11 88795,82
654263,47 88823,61
654273,14 88827,14

et éventuellement relier les deux chiffres par une virgule dans une même cellule, du genre : (1ère ligne)

654234.47,88834.74

Merci d'avance,

 

[tototiti2008]

Re : Inverser les points et les virgules

Bonjour Trempass,

peut-être :

=SUBSTITUE(A1;",";".")&","&SUBSTITUE(B1;",";".")

Edit : Bonjour Raja, Bonjour Roger, Bonjour Tibo, Bonjour Pierrot
5 réponses en 11 minutes, pas mal

 

[Raja]

Re : Inverser les points et les virgules

Bonjour,

Essaye la formule suivante en C1 et copie vers le bas :

=SUBSTITUE(A1;",";".")&","&SUBSTITUE(B1;",";".")

 

[ROGER2327]

Re : Inverser les points et les virgules

Bonjour Trempass

Voyez si le classeur joint vous convient.​

ROGER2327

 

[Tibo]

Re : Inverser les points et les virgules

Bonjour,

Si tes données sont en A1 B1 et lignes suivantes, en C1, cette formule :

=SUBSTITUE(A1;",";".")&","&SUBSTITUE(B1;",";".")

Je te laisse essayer

@+

Edit : Bing ! Salut Roger

@+

Redit :

Si les données sont dans une seule colonne (colonne A), en B1 :

=SUBSTITUE(SUBSTITUE(A1;",";".");" ";",")

@+

Rereedit : Pas vu tout le monde !! Salut Tototiti, salut Raja, salut Pierrot

 

[Pierrot93]

Re : Inverser les points et les virgules

Bonjour à tous,

une solution vba, teste la colonne a de la feuille active :

Option Explicit
Sub test()
Dim c As Range
For Each c In Range("A1:A" & Range("A65536").End(xlUp).Row)
    c.Value = Replace(Replace(c.Value, ",", "."), " ", ",")
Next c
End Sub

bonne soirée
@+

 

[Trempass]

Re : Inverser les points et les virgules

Merci à tous,

Surtout de la rapidité.
La formule correspond tout à fait à mes besoins
Je prends la première solution, mais ne veux vexer personne.

Bonne fin d'après-midi

Trempass