hatanın sebebi nedir

[drykcktl]

Private Sub CommandButton1_Click()
Range("A1").Vaule = TextBox1.Value
End Sub

 

[Orion1]

textboxtaki değer sayı ise aşağıdakini kullanınız.

Range("A1").Vaule = cdbl(TextBox1.Value)

 

[drykcktl]

textboxtaki değer sayı ise aşağıdakini kullanınız.

Range("A1").Vaule = cdbl(TextBox1.Value)

yeni başladım hiç bir değer vermemiştim daha ama denicem teşekkür ederim size

 

[drykcktl]

textboxtaki değer sayı ise aşağıdakini kullanınız.

Range("A1").Vaule = cdbl(TextBox1.Value)

maalesef aynı hata devam ediyor

 

[Orion1]

maalesef aynı hata devam ediyor

Hata olarak ne oluyor?
Örnek dosya ekleyiniz.

 

[halit3]

Evren beyin kodunda küçük bir yazım hatası olmuş aşağıdaki kırmızı yer gibi yapın.

Range("A1").[COLOR="red"]Vaule [/COLOR]= cdbl(TextBox1.Value)

Range("A1").[COLOR="Red"]Value[/COLOR] = cdbl(TextBox1.Value)

 

[Orion1]

Evren beyin kodunda küçük bir yazım hatası olmuş aşağıdaki kırmızı yer gibi yapın.

Range("A1").[COLOR="red"]Vaule [/COLOR]= cdbl(TextBox1.Value)

Range("A1").[COLOR="Red"]Value[/COLOR] = cdbl(TextBox1.Value)

Halit bey kod için teşekkürler.
Bu kodu ben yazmadım.Arkadaş yazmış.Ben sadece cdbl fonksiyonunu ekledim.
O yanlış yazmış,ama bende denemedim,gözümden kaçmış.1nci mesajda gözüküyor hata.

 

[drykcktl]

Hata olarak ne oluyor?
Örnek dosya ekleyiniz.

ilk mesajdaki dosya da girişi tıkladığımda TextBox1 yazdığım şey a1 hücresine kaydetmek istiyorum ama olmuyor...

bu mesajdaki dosyada ne yazıyorsa onu aldım ama olmuyor..bu daha başlangıç

http://www.excel.web.tr/f60/userform-hazyrlama-ve-kod-yazma-t77164.html

 

[halit3]

Halit bey kod için teşekkürler.
Bu kodu ben yazmadım.Arkadaş yazmış.Ben sadece cdbl fonksiyonunu ekledim.
O yanlış yazmış,ama bende denemedim,gözümden kaçmış.1nci mesajda gözüküyor hata.

Evet Evren bey benimde gözümden kaçmış birinci mesajdan geliyormuş yazım hatası

 

[drykcktl]

Evren beyin kodunda küçük bir yazım hatası olmuş aşağıdaki kırmızı yer gibi yapın.

Range("A1").[COLOR="red"]Vaule [/COLOR]= cdbl(TextBox1.Value)

Range("A1").[COLOR="Red"]Value[/COLOR] = cdbl(TextBox1.Value)

olmuyor ((

 

[Orion1]

A1 hücresine kaydetmek istediğiniz veri sayımıdır?

 

[drykcktl]

oldu çok teşekkür ederim arkadaşlar

 

[drykcktl]

A1 hücresine kaydetmek istediğiniz veri sayımıdır?

saat olacak ama ben daha yeni başladığım için sadece kodları yazmaya çalışıyorum umarım doğru yoldayımdır