Takvim nesnesiyle yazılan tarihlerdeki hata

[Emir Hüseyin Çoban]

Merhaba Arkadaşlar,

Ekteki dosyamda enteresan diye tabir edebileceğim bir hata oluştu.

Tümgörevler sayfasında A sütunun herhangi bir hücreyi tıklayınca takvim açılıyor ve seçilen tarihi hücreye giriyor.

Sorgula sayfasında B1 ve B2 hücrelerinde çift tıklayınca takvim açılıyor ve hücreye tarihi giriyor.

Sorgula sayfasındaki büyüteç resmini tıklayınca başlangıç ve bitiş tarihleri arasındaki notları getiriyor.
Bu notlar tümgörevler sayfasında ilgili tarihler arasındaki kalın puntolu veriler.
Sorgula makrosu module2 içerisinde.

Tarihleri takvim nesnesiyle girdiğim zaman sorgulamada notları doğru şekilde getirmiyor. Ancak bütün tarihleri elle yazdığım zaman doğru getiriyor.
Takvim nesnesinde tam olarak anlayamadığım bir hata veya başka birşey var.

 

[zafer]

Merhaba

Kodlarda tarih formatı olmadan aşağıdaki gibi kullanınız.

Private Sub Calendar1_Click()
 ActiveCell = Calendar1.Value
    Unload Me
End Sub

 

[Emir Hüseyin Çoban]

Teşekkür ederim Sy Zafer, sorunumu çözdünüz.
İyi günler dilerim.