XL 2019 valeur numérique avec point ou virgule

[re4]

Bonjour,
Avec de formules imbriquées dans des cellules, j'arrive à un résultat recherché mais ça fait des formules bien compliqués pour un truc certainement plus simple en vba.
Il faudrait à partir d'une saisie numérique type 100.11 ou 100,11 (point ou virgule) je voudrais toujours un résultat avec une virgule. dans tous les cas cela doit être un format numérique

Merci

 

[danielco]

Bonjour,

Pour une valeur en H7 :

=CNUM(SUBSTITUE(H7;".";","))

Daniel

 

[re4]

Bonjour Danielco, tu m'as déja aidé plusieurs fois, merci,
Super, c'est si simple... ,-)
Et si c'est sous cette forme 100.11 Mo ou 100.11 Mo ?
Je peux faire ça =GAUCHE(H7; TROUVE("M"; H7) -1)*1 mais je ne sias pas faire sauf à passer par une cellule intermédiaire puis =CNUM(SUBSTITUE(H7;".";","))
.

 

[fanch55]

Bonjour,
Ou par macro à mettre dans le module ThisWorkbook :

Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
Dim M, DM, Cell As Range
    For Each Cell In Target.Cells
        M = Evaluate("=Cell(""format""," & Cell.Address & ")")
        If M Like "C*" Or M Like "F*" Or M Like ",*" Then
            DM = IIf(Application.DecimalSeparator = ".", ",", ".")
            If InStr(Cell, DM) Then
                Application.EnableEvents = False
                    Cell.Value = Val(Replace(Cell, DM, Application.DecimalSeparator))
                Application.EnableEvents = True
            End If
        End If
    Next
End Sub

 

[re4]

Sauf erreur de ma part lorsque le format est standard ça affiche 100,00 et pas 100,11, d'autre part et pardon de pas l'avoir préciser j'appliquerai le format personnalisé ( 0,00" Mo" ).
Il ne faudrait pas supprimer Mo si le format est correct c'est à dire 100,11 (avec la virgule)
Autre précision les saisies que je reçois ne sont pas toujours respectées ça peut être 100.11 100 Mo 100.11 Mo ou la même chose mais avec un point ;-(
Le but est d'avoir un format num que je puisse additionner (c'est ta 1er formule)

 

[danielco]

Bonjour Danielco, tu m'as déja aidé plusieurs fois, merci,
Super, c'est si simple... ,-)
Et si c'est sous cette forme 100.11 Mo ou 100.11 Mo ?
Je peux faire ça =GAUCHE(H7; TROUVE("M"; H7) -1)*1 mais je ne sias pas faire sauf à passer par une cellule intermédiaire puis =CNUM(SUBSTITUE(H7;".";","))
.

Essaie :

=CNUM(SUBSTITUE(SUBSTITUE(H7;" MO";"");".";","))

Daniel

 

[re4]

Oui, Nikel mais comme certains n'aiment pas l'informatique il peuvent écrire MO ou Mo avec ou sans espace

 

[danielco]

Oui, Nikel mais comme certains n'aiment pas l'informatique il peuvent écrire MO ou Mo avec ou sans espace

Essaie :

=CNUM(SUBSTITUE(SUBSTITUE(MAJUSCULE(H7);"MO";"");".";","))

Daniel

 

[re4]

Essaie :

=CNUM(SUBSTITUE(SUBSTITUE(MAJUSCULE(H7);"MO";"");".";","))

Daniel

Merci beaucoup, c'est exactement ce que je cherchais
Bonne soirée