kayıt

[memduh]

Günaydın Arkadaşlar.
userform üzerinde Combobox1 'de sayfa isimleri var. textbox1 ve textbox2 ye gireceğim tarihleri, Combobox1 de seçtiğim sayfayanın D1040 (textbox1) ve E10:E40 (textbox2) kayıt yapmasını istiyorum. ayrıca eğer hücre dolu ise bir sonraki hücreye kayıt yapsın.textboxlar boş ise msgbox lütfen tarih giriniz uyarısını versin.

 

[Levent Menteşoğlu]

Ekteki dosyayı inceleyiniz.

 

[memduh]

Sayın Leventm Beye teşekkürler.
Ellerine Sağlık.

 

[memduh]

sayın Leventm bir eksiklik daha var.
kayıt butununa bastıksan sonra textboxların içinin boşalmasını istiyorum.
İlginiz için teşekkür ederim.

 

[Levent Menteşoğlu]

Ekteki örneği inceleyiniz.

 

[memduh]

Sayın Levent bey Saygılar.
Başka bir program hazırlıyorum. bir yerde takıldım.
Sheets(combobox1 .Value).Cells(satd, 4) = CDate(TextBox1.Value)
bu formülde ""CDate"" yerine tarih veya sade yazı ise nasıl yazılır.


ofis 2003 Türkçe

 

[Hüseyin]

Başka bir program hazırlıyorum.

Lütfen ayrı soruları yeni başlık açarak sorunuz.

Teşekkürler.

 

[isakarakus]

merhaba

CDate(TextBox1.Value)

burada CDate textbox1'in içindeki veriyi tarihe dönüştürmeye çalışır,

[vb:1:779683d47b]Sheets(combobox1 .Value).Cells(satd, 4) = CDate("31/03/2005")
'veya
Sheets(combobox1 .Value).Cells(satd, 4) = "31/03/2005"[/vb:1:779683d47b]
deneyin

 

[memduh]

özür dileyerek başlamak istiyorum.
aynı konu olunca aynı başlık ltında sorayım dedim.
sanırım soruyuda yanlış sormuşum.
Sheets(combobox1 .Value).Cells(satd, 4) = CDate("31/03/2005")
Burada textboxın içindeki veri sade yazı ise nasıl yapılır. saat ise veri nasıl yapılır.

 

[isakarakus]

CStr("ne yazarsan yaz sitring oluyor..")

ya da VB editörden view>objecjt borowser tıklayın

conversion kelimesini arattırın, birçok çevirim kodu bulacaksınız,
incelerseniz daha fazla bilgiye ulaşabilirsiniz.