format texte en nombre avec userform?

[hmorad]

bonjour, depuis pas mal de temps je cherche a modifier le format texte en nombre quand je fais ma saisie avec un userform.
Je suis débutant et je galère!!!!
la saisie fonctionne mais il y a un message d erreur de format
A L'AIDE!!!

Private Sub valider_Click()

Dim LastRow As Object

Set LastRow = liste.Range("a65536").End(xlUp)

LastRow.Offset(1, 0).Value = gencode
LastRow.Offset(1, 1).Value = reference
LastRow.Offset(1, 2).Value = designation
LastRow.Offset(1, 3).Value = prixachat
LastRow.Offset(1, 4).Value = taille
LastRow.Offset(1, 5).Value = couleur
LastRow.Offset(1, 6).Value = marque
LastRow.Offset(1, 7).Value = quantite
LastRow.Offset(1, 8).Value = prixvente

MsgBox "Enregistrement dans la liste"

response = MsgBox("Nouvel saisie?", _
vbYesNo)

If response = vbYes Then
gencode = ""
reference = ""


gencode.SetFocus

Else
Unload Me
End If


gencode.Value = ""
reference.Value = ""
designation.Value = ""
prixachat.Value = ""
taille.Value = ""
couleur.Value = ""
marque.Value = ""
quantite.Value = ""
prixvente.Value = ""


End Sub

 

[PascalXLD]

Re : format texte en nombre avec userform?

Bonjour

essaies en ajoutant

val ou cdbl suivant si tu utilises le point ou la virgule

exemple

LastRow.Offset(1, 3).Value = Val(prixachat)

ou

LastRow.Offset(1, 3).Value = CDbl(prixachat)

 

[hmorad]

Re : format texte en nombre avec userform?

re, un grand merci a toi pascal!!!!!!
ça marche!!
merci encore