Bugünün Tarihini Bulmak

[vikingposta]

Değerli Üstadlar,
Bugünü sadece tarih olarak nasıl getirebilirim. Aşağıdaki 2 kodu denedim ama tam sonuç olmadı.

Bu kod hücreye bugünün tarihini ve saati, dakikayı birlikte getiriyor.
Sub TARIH()
Range("A1") = CDate(Now())
End Sub

Bu kod hücreye bugünün tahini getiriyor ama tarih formatında değil.
Sub TARIH()
Range("A1") = WorksheetFunction.Text(CDate(Now()), "dd.mm.yyyy")
End Sub

 

[Korhan Ayhan]

Deneyiniz.

Range("A1") = CDate(Date)

 

[vikingposta]

Deneyiniz.

Range("A1") = CDate(Date)

Teşekkür ederim Korhan Ayhan. Harika.