Textboxa ayın ilk gününü atamak

[Korhan Ayhan]

Selam arkadaşlar,

Oluşturduğum userform açıldığında textbox1 de içinde bulunduğumuz ayın ilk gününü atamak için nasıl bir kod kullanmam gerekiyor.

Textbox1 =Date ile tarihi atıyorum fakat bana ayın ilk günü lazım.


İyi çalışmalar dilerim. :hey:

 

[Haluk]

Merhaba;

Bir de böyle deneyin ...

TextBox1 = Date - Day(Date) + 1

 

[Korhan Ayhan]

Sn. Raider,

Vermiş olduğunuz kod çalıştı fakat tarihi (01-07-2005) değilde (07-01-2005) olarak verdi. Ben de koda aşağıdaki şekilde ek yaptım.

TextBox1 = (Date - Day(Date) + 1) * 1 yada

TextBox1 = CDate(Date - Day(Date) + 1) * 1

Bu uygulamalar sağlıklımıdır ?

İyi çalışmalar dilerim.

 

[Haluk]

Sonuca ulaşabiliyorsanız bence pek fazla sorun olmaz.

Þöyle bir şey de olabilir ...

TextBox1 = Format(Date - Day(Date) + 1, "dd.mm.yyyy")