aide sur nombre stocker en forma texte (combobox)

[nordov6]

salut tous le monde forum
j'ai un code vba mais a l’enregistrement les cellules marque nombre stocker en forma texte
voila le code
je souhaite que qq le corrige

Private Sub Bt1_Click()

    Dim lig&, i&, num
    If C2.ListIndex = -1 Then
        If Not Opt1 And Not Opt2 And Not Opt3 And Not Opt4 And Not Opt5 And Not Opt6 Then MsgBox "Vous devez choisir une classe", , "Choisir une Classe SVP": Exit Sub
        lig = Sheets(c23.Text).Range("B" & lign).End(xlUp).Row + 1
        
    Else
        lig = C2.List(C2.ListIndex, 22)
    End If
    With Sheets(c23.Text)
        For i = 2 To 22
            .Cells(lig, i) = Controls("C" & i)
        Next i
    End With
    Unload Me
    UserForm18.Show 0
End Sub

et merci d'avance

 

[jpb388]

Re : aide sur nombre stocker en forma texte (combobox)

Bonjour a tous
essayes
.Cells(lig, i) = Controls("C" & i).value
ou
.Cells(lig, i) = format(Controls("C" & i),"0,00")

 

[nordov6]

Re : aide sur nombre stocker en forma texte (combobox)

dieu te bénisse
c'est la (.value )qui marche parfaitement
l'autre change même la date
merci infiniment