İşlev VBA: Date

Tanım

VBA Date işlevi geçerli sistem tarihini döndürür.

Sözdizimi Date

Date

Örnek VBA Date

Date fonksiyonunun döndürdüğü tarihi A1 hücresinde saklayalım:

Sub DateExample1()

    Range("A1") = Date
    
End Sub

Date fonksiyonunun döndürdüğü tarihi metin formatında görüntüleyelim:

Sub DateExample2()

    MsgBox Format(Date, "d mmmm yyyy") 'Örneğin geri dönüşler: 2 Kasım 2020
    
End Sub

Eylemi yalnızca Date işlevinin döndürdüğü tarih ayın ilk gününe karşılık geliyorsa gerçekleştireceğiz:

Sub DateExample3()

    If Day(Date) = 1 Then
        MsgBox "Ayın ilk günü!"
    End If
    
End Sub