listbox da ve texbox tarih formatı

[Turgay1983XX]

Merhaba
üstatlar ben texbox daki veriyi Sheets("StokSorgu").Range("A" & yenisatir).Value = format(Txt_Tarih.Value, "dd.mm.yyyy") bu şekilde tarih olarak excele kaydediyorum ama 21.09.2024 olarak geçmesine rağmen süzerken tarih olarak süzmüyor ve listbox a da tarih olarak gelmiyor. excelden işlem yapmaya kalktığım da da olmuyor. sormak istediğim bunu tam anlamı ile tarih formatında nasıl excel e aktarabilirim

 

[Biolightant]

Merhaba,
Sheets("StokSorgu").Range("A" & yenisatir).Value = CDate(Txt_Tarih.Value) ' sistem tarih formatı "dd.mm.yyyy"
' Sistem tarih formatı farklı ise
' Sheets("StokSorgu").Range("A" & yenisatir).Value = CDate(Format(Txt_Tarih.Value, "dd.mm.yyyy"))