XL 2016 Userform: problème de format à la sortie d'une textbox

[Camcam]

Bonjour,
j'ai créé un Userform avec une Textbox. Celui-ci m'envoie les données saisies dans la Textbox dans un tableau seulement elles sont en format texte... Je sais que plusieurs personnes ont eu le même problème que moi seulement je n'arrive pas à appliquer les solutions qu'on leur a donné à mon code... Si quelqu'un sait comment faire
Voici le code en question:

Private Sub VALIDER2_Click()

Dim ligvid As Integer
ligvid = Columns("H").Find("", Range("H4"), xlValues).Row
Cells(ligvid, "H") = TextBox1
ligvid = Columns("I").Find("", Range("I4"), xlValues).Row
Cells(ligvid, "I") = ComboBox1
ligvid = Columns("J").Find("", Range("J4"), xlValues).Row
Cells(ligvid, "J") = TextBox2

Seule la dernière ligne me pose problème, c'est la seule que je tiens à garder en format nombre.

Merci de votre aide!
Bonne journée

 

[job75]

Bonjour Camcam,

Seule la dernière ligne me pose problème, c'est la seule que je tiens à garder en format nombre.

If IsNumeric(ComboBox1) Then Cells(ligvid, "I") = CDbl(ComboBox1)

A+

 

[Camcam]

Oh trop bien merci merci merci Job 75!! ça marche nickel!!!