Label Üzerinde Tarih Format Hatası

[htsumer]

CommandButton1'e atadığım kod :

Label1.Caption = Sheets("kütük").Cells(X, 19) & "Tarihinde Bu Kişiye Belge Verilmiştir"

Sonucu Labelde şu şekilde:

09/07/2010 Tarihinde Bu Kişiye Belge Verilmiştir

Aynı işlemi ListBox üzerinde şu kodla alıyorum.

      Label1.Caption = .List(.ListIndex, 18) & "Tarihinde Bu Kişiye Belge Verilmiştir"

Sonucu Labelde şu şekilde geliyor.

40368 Tarihinde Bu Kişiye Belge Verilmiştir


CommandButton ile atama sonucu tarih formatı doğru fakat listboxa tıklanıldığında labele aktarılan tarih formatı, tarih formatında çıkmıyor.

ikinci kodda tarih formatını adapte edemedim..

 

[Levent Menteşoğlu]

Aşağıdaki gibi format tanımlayın.

Label1.Caption = format(.List(.ListIndex, 18),"dd/mm/yyyy") & "Tarihinde Bu Kişiye Belge Verilmiştir"

 

[htsumer]

Merhaba Levent,

Tamam, şimdi oldu çok teşekkür ederim..