XL 2016 Passage d'un format a autre

[kaki31]

Bonjour,
Comment dans la plage de E4 a E1000 et de F4 a F1000, passer d'un format a un autre ex :123.125,25 vers 123 125.25, le nombre est remplacé automatiquement après validation.
Merci.
🙂

 

[shinozak]

Bonjour,

=SUBSTITUTE(E4;",";".")

Pour passer de virgule a point.

Bonne soirée

 

[Phil69970]

Bonjour à tous

On dirait un problème de paramétrage de Windows

==> https://support.microsoft.com/fr-fr...6e2-4360-bc1b-30e9e8a54989#id0efbd=windows_10

 

[kaki31]

Bonjour,

=SUBSTITUTE(E4;",";".")

Pour passer de virgule a point.

Bonne soirée

Bonjour,
l'idéal serai par VBA pour que les nombres restent dans la même plage.
Merci.
🙂

 

[TooFatBoy]

Bonjour,

l'idéal serai par VBA pour que les nombres restent dans la même plage.

Et pourquoi pas manuellement :
- <Ctrl>+<H>
- "Rechercher" : .
- "Remplacer par" :

 

[job75]

Bonjour kaki31, le forum,

l'idéal serai par VBA pour que les nombres restent dans la même plage.

Voyez le fichier joint et cette macro dans le code de la feuille qui traite la colonne A :

Private Sub Worksheet_Change(ByVal Target As Range)
Dim plage As Range
Set plage = [A:A] 'plage à traiter, à adapter
Set Target = Intersect(Target, plage, Me.UsedRange)
If Target Is Nothing Then Exit Sub
Application.EnableEvents = False 'désactive les évènements
For Each Target In Target.Areas 'si entrées multiples (copier-coller)
    Target.Replace ",", ".", xlPart 'remplace la virgule par le point
    Target = Target.Value
Next Target
Application.EnableEvents = True 'réactive les évènements
End Sub

Elle fonctionne quel que soit le séparateur décimal utilisé, virgule ou point, et quel que soit le séparateur décimal de l'ordi.

A+