Format nombre

Bonjour,

Suite à la création d'un petit formulaire pour modifier une cellule suivant une liste de nombre, je souhaiterais savoir s'il est possible de forcer excel à stocker cette donnée sous format nombre et non texte comme il le fait systématiquement.

Private Sub UserForm_Initialize()
Dim Plage As String
With Sheets("Base_ET")
    Plage = .Range("B2:B70" & .Range("A65536").End(xlUp).Row).Address
End With
ComboBox1.RowSource = "Base_ET!" & Plage
End Sub
Private Sub CommandButton1_Click()
 Sheets("Calcul FL").Range("A1") = ComboBox1
 Unload mon_userform

End Sub

Merci

Bonjour,

Sheets("Calcul FL").Range("A1") = cdbl(ComboBox1)

eric

Merci Eric

Ça fonctionne