Kayit Aktarma Sorunu

[erzen]

Arkadaşlar aşağıdaki kodlarla veri aktardığımda excel sayfasındaki hücrelerde değer metin olarak belirlenmiş yada önünde kesme işareti var diye uyarı geliyor. Nasıl düzeltebilirim? Şimdiden teşekkürler.

Private Sub CommandButton13_Click()
Range("c4").Value = TextBox1
Range("c5").Value = ComboBox1
Range("al2").Value = ComboBox2
Range("am2").Value = TextBox2
Range("an2").Value = TextBox3
Range("a13").Value = TextBox4
Range("a15").Value = TextBox5
Range("a19").Value = TextBox6
Range("a17").Value = TextBox7
Range("c21").Value = TextBox8
Range("a11").Value = TextBox9
Range("d11").Value = TextBox10
End Sub

 

[Orion1]

Sayısal değer olan nesnelerin sonuna * 1 koyun.
Mesela Textbox1 * 1

 

[erzen]

Teşekkür ederim

 

[Orion1]

Teşekkür ederim

Rica ederim.