फ़ंक्शन VBA: Date

विवरण

VBA Date फ़ंक्शन वर्तमान सिस्टम दिनांक लौटाता है।

सिंटैक्स Date

Date

उदाहरण VBA Date

आइए Date फ़ंक्शन द्वारा लौटाई गई तारीख को सेल A1 में संग्रहीत करें:

Sub DateExample1()

    Range("A1") = Date
    
End Sub

आइए Date फ़ंक्शन द्वारा लौटाई गई तारीख को टेक्स्ट प्रारूप में प्रदर्शित करें:

Sub DateExample2()

    MsgBox Format(Date, "d mmmm yyyy") 'रिटर्न, उदाहरण के लिए: 2 नवंबर, 2020
    
End Sub

हम कार्रवाई तभी करेंगे जब Date फ़ंक्शन द्वारा लौटाई गई तारीख महीने के पहले दिन से मेल खाती हो:

Sub DateExample3()

    If Day(Date) = 1 Then
        MsgBox "यह महीने का पहला दिन है!"
    End If
    
End Sub