DTPicker Problemi

[Anafartalar]

Merhabalar,

Normal şartlarda aşağıdaki kod çalışıyor sorun yok. Ancak ne zaman ki bir htm dosyasına söz konusu dosyayı açmak için link koydum. DTPicker çalışmamaya başladı. Aslında yarı yarı çalışıyor. Şöyleki excel sayfası exploler penceresinde açılıyor DTPicker'ı çalıştırdığımda hücrelerde ki mevcut tarihleri alıyor. Ancak ben yeni tarih seçsemde seçmesemde CommandButton1 butonuna bastığımda hata veriyor. Acaba bunun nedeni ne olabilir? Sonuçta hiç çalışmayacak olsa baştan hata verir ama ben hücreye yeni yeni tarih gönderdiğimde hata alıyorum. Yardımcı olursanız sevinirim.

Teşekkürler

Private Sub CommandButton1_Click()
Cells(2, 2) = Tarih_Secimi.DTPicker1.Value
Cells(3, 2) = Tarih_Secimi.DTPicker2.Value
Unload Me


End Sub

Private Sub UserForm_Initialize()
Tarih_Secimi.DTPicker1.CheckBox = False
If Cells(2, 2) <> "" Then
Tarih_Secimi.DTPicker1.Value = Cells(2, 2)
Else
Tarih_Secimi.DTPicker1.Value = "01.01.2008"
End If
Tarih_Secimi.DTPicker2.CheckBox = False
If Cells(3, 2) <> "" Then
Tarih_Secimi.DTPicker2.Value = Cells(3, 2)
Else
'Tarih_Secimi.DTPicker2.Value = DateTime
End If
End Sub

 

[Anafartalar]

Bu konuda destek olabilecek kimse yokmu?

 

[Ferhat Pazarçevirdi]

Ben anlamadım.

Siz, html bir sayfada mı bu kodları işlemeye çalışıyorsunuz?

Bence örnek bir dosya ekleyin. Daha anlaşılır olacaktır.

 

[Anafartalar]

Merhaba,

örnek dosya ektedir. Excel dosyasını normal olarak çalıştırdığımda sorun yok. Ama htm sayfasındaki linkden excel dosyasını açtığımda DTPicker hücreye değer göndermiyor. DTPicker'ı çalıştırmak için tarihin bulunduğu gücrelere bir kez tıklayın.

 

[Ferhat Pazarçevirdi]

index1.htm'den linklediğiniz "xls" dosyasını açtım. Makroları etkinleştirdim. Hücreleri seçtim. Dtpicker'lerın her ikisini de değiştirerek, "Onayla" butonuna bastım ve herhangi bir hata ile karşılaşmadım.

Aldığınız hata mesajı nedir? Tam olarak belirtiniz.

 

[Anafartalar]

Çok ilginç çünkü bende aynı işlemi yaptığımda ekteki hatayı alıyorum.