Convertir un texte en nombre

Hasco

XLDnaute Barbatruc

Repose en paix

• 11 Avril 2019

• #2

Bonjour,

C'est certainement la "macro qui me permet de convertir un texte en nombre " qui est à modifier afin que le résultat ne soit plus sous forme de texte mais sous forme de nombre.

Bonne soirée

 

Vote positif 0 Vote négatif

eriiic

XLDnaute Barbatruc

• 11 Avril 2019

• #3

Bonjour,

sans macro, remplacer le point par la virgule

Ta macro applique un format numérique. En aucun cas elle convertit en texte en nombre
eric

 

Vote positif 0 Vote négatif

Modeste geedee

XLDnaute Barbatruc

• 11 Avril 2019

• #4

Bonsour®

eriiiic à dit:

sans macro, remplacer le point par la virgule

Cliquez pour agrandir...

le demandeur est un inconditionnel des macros ... !!!

https://www.excel-downloads.com/threads/convertir-un-nombre-en-date.20030503/#post-20225879

 

Vote positif 0 Vote négatif

eriiic

XLDnaute Barbatruc

• 11 Avril 2019

• #5

Bah, il comprendra un jour qu'apprendre à se servir d'excel peut éviter d'attendre 3h une réponse ;-)

 

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 11 Avril 2019

• #6

Bonsoir à tous,

VB:

Sub TexteVersNombreArrondi()
Dim ndec As Byte, P As Range, tablo, dsep$, i&, x$
ndec = 2 'nombre de décimales, à adapter
Set P = Sheets("emplacement").UsedRange.Columns(1) 'plage à adapter
tablo = P.Resize(, 2) 'matrice, plus rapide, au moins 2 éléments
dsep = Application.DecimalSeparator
For i = 1 To UBound(tablo)
    x = Replace(tablo(i, 1), ".", dsep)
    If IsNumeric(x) Then tablo(i, 1) = Round(x, ndec) 'convertit et arrondit
Next
P = tablo 'restitution
End Sub

A+

 

Vote positif 0 Vote négatif