Soru Bir Tarih Seçici (DateTimePicker) çalışması...

aliakgul

Altın Üye
Katılım
9 Mayıs 2005
Mesajlar
402
Excel Vers. ve Dili
Ofis 2016 TR 64 Bit
Altın Üyelik Bitiş Tarihi
03-08-2025
Merhaba,
Uzunca bir aradan sonra tekrar burda olmak güzel.Herkese iyi çalışmalar dilerim...
Bir Tarih Seçici(Date Tim Picker) çalışması yaptım. Burda gün sayılarının yer aldığı 42 adet textbox var. Gün sayısına tıklandığında ilgili günün tarihi baştaki textbox'a atanıyor. Bunun için ilgili kodları 42 textbox'ın her biri altına yazmam gerekiyor, yada ClassModüle oluşturmam gerek.
*42 textbox'ın her birine yazmadan, tek kodla yapamaz mıyız?( ClassModule olmadan)
Yani, bir kod yazacağız ve t1.....t42 arası textboxlardan herhangi birine tıklayınca aynı kodlar çalışacak.
*Bu 42 textbox'da tıkladığımızda imleci nasıl pasif yaparız?(Tıklanan textbox içinde imleç yanıp sönmesin)
Not:Örnek kodlar 42 textbox da sadece ilk pazar gününde var.
Teşekkürler, iyi çalışmalar...

246335
 

aliakgul

Altın Üye
Katılım
9 Mayıs 2005
Mesajlar
402
Excel Vers. ve Dili
Ofis 2016 TR 64 Bit
Altın Üyelik Bitiş Tarihi
03-08-2025
Uzunca bir uğraşıdan sonra çalışmamı ekteki gibi düzenledim. Fikir edinmek isteyenler için bitmiş halini paylaşıyorum.
Emeğe saygı için belirtmek isterim ki, çalışmadaki kodları Sayın M. MUSTAFA BOLAT 'ın bir video dersini izlerken oluşturdum...
 

Ekli dosyalar

okan32

Altın Üye
Katılım
12 Mayıs 2016
Mesajlar
376
Excel Vers. ve Dili
Ofis 2019- 32 Bit - Türkçe
Altın Üyelik Bitiş Tarihi
16-04-2026
Uzunca bir uğraşıdan sonra çalışmamı ekteki gibi düzenledim. Fikir edinmek isteyenler için bitmiş halini paylaşıyorum.
Emeğe saygı için belirtmek isterim ki, çalışmadaki kodları Sayın M. MUSTAFA BOLAT 'ın bir video dersini izlerken oluşturdum...
Ali bey çok güzel olmuş fakat yalnızca a1 hücresine yazıyor tarihi aktif hücreye nasıl yazdırabilriz
 

Mdemir63

Altın Üye
Katılım
7 Temmuz 2006
Mesajlar
2,860
Excel Vers. ve Dili
Ofis2010 32Bit Türkçe
Altın Üyelik Bitiş Tarihi
19-02-2026
Ali bey çok güzel olmuş fakat yalnızca a1 hücresine yazıyor tarihi aktif hücreye nasıl yazdırabilriz
Selamlar
Kodlardaki bu satırı

Kod:
Sayfa1.Cells(1, 1) = TextBox5.Value
Aşağıdaki ile değiştirebilirsiniz

Kod:
ActiveCell.Value = TextBox5.Value
 
Üst