TextBox valeur en texte

Bonjour,
J'apprends mais doucement le VBA.
J'aimerai lorsque j'enregistre mon formulaire que les valeurs mises dans les TextBox soient transformer au format numérique pour une utilisation avec formule après sur la feuille de données.Actuellement les données lors de l'enregistrement sont au format texte.
Ci-après le code:

Option Explicit
Dim Ws As Worksheet

Private Sub CommandButton1_Click()
'Pour le bouton Nouveau enregistrement
Dim L As Integer

If MsgBox("Confirmez-vous l’insertion de ce nouveau enregistrement ?", vbYesNo, "Demande de confirmation d’ajout") = vbYes Then

L = Sheets("Données").Range("a65536").End(xlUp).Row + 1 'Pour placer le nouvel enregistrement à la première ligne de tableau non vide

Range("A" & L).Value = Now
Range("B" & L).Value = ComboBox1
Range("C" & L).Value = TextBox7
Range("D" & L).Value = TextBox8
Range("E" & L).Value = TextBox1
Range("F" & L).Value = TextBox2
Range("G" & L).Value = TextBox3
Range("H" & L).Value = TextBox4
Range("I" & L).Value = TextBox5
Range("J" & L).Value = TextBox6
Range("L" & L).Value = TextBox9


End If
End Sub
Private Sub CommandButton2_Click()
'Pour le bouton Quitter
Unload Me
End Sub


Merci par avance.