Convertir texte en nombr

Bonjour

dans une feuille excel, j'ai un chiffre venant d'un userform qui se met en texte

comment le mettre en valeur nombre

si joint le code

Cells(modif, 8) = lblComm2

avec lblcomm2 venant de

Private Sub TextBox16_Exit(ByVal Cancel As MSForms.ReturnBoolean)

Dim ca@: ca = Val(Replace$(TextBox16, ",", "."))

lblComm2.Caption = Commission(ca)

End Sub

merci de votre retour

Bonjour,

les fonctions de conversion dans VBA :

CInt() --> Entier (Integer)

CLng() --> Gros entier (Long)

CSng() --> Décimal (Single)

CDbl() --> Gros décimal (Double)

Bonjour fabguilb, Pedro,

attention : pour le chiffre d'affaires, j'avais mis : Dim ca@ : idem que Dim ca As Currency

c'est le format pour des calculs monétaires :

screen

de plus, la fonction Commission() retournait un Currency :

Function Commission(ca@) As Currency

je suggère donc d'utiliser :

Cells(modif, 8) = CCur(lblComm2)

dhany

Merci Dhany

Rechercher des sujets similaires à "convertir texte nombr"