RESOLUS ENCORE MERCI

bonjour le forum merci robert pour avoir répondus
oui car j ai pris dans boite outil et en propriété il indique bien combobox 1
je souligne la ligne que je voudrais changer
voila tout le code que j avais
Private Sub CommandButton2_Click()

Dim Numlignevide As Integer
With Sheets("INDV")

Numlignevide = .Columns(1).Find("").Row 'on trouve la dernière ligne vide du tableau'
.Cells(Numlignevide, 1) = TextBox15.Value
.Cells(Numlignevide, 2) = DTPDate1.Caption
.Cells(Numlignevide, 3) = TextBox13.Value
.Cells(Numlignevide, 4) = TextBox14.Value
.Cells(Numlignevide, 5) = TextBox1.Value (combobox1.value)
.Cells(Numlignevide, 6) = TextBox2.Value
.Cells(Numlignevide, 7) = TextBox3.Value
.Cells(Numlignevide, 8) = TextBox4.Value
.Cells(Numlignevide, 9) = TextBox5.Value
.Cells(Numlignevide, 10) = TextBox6.Value
.Cells(Numlignevide, 11) = TextBox7.Value & " " & TextBox8.Value & " " & TextBox9.Value
.Cells(Numlignevide, 12) = TextBox10.Value

End With

Re,

Attends ! Ne me dis pas que tu as mis :
Mais plutôt :

Merci Robert désolé pour la peur bien oui j' ai mis la deuxième proposition heureusement pour moi c est juste pour montrer par quoi je remplace ma ligne je suis désolé

bonjour le forum enfin je viens de trouvé mon erreur j avais oublié de mettre un point
encore merci