VBA Weekday फ़ंक्शन दी गई तारीख के लिए कार्यदिवस संख्या (1 से 7 तक) लौटाता है।
Weekday(तारीख)
या
Weekday(तारीख, सप्ताह का पहला_दिन)
डिफ़ॉल्ट रूप से, सप्ताह का पहला दिन रविवार (1) है और अंतिम दिन शनिवार (7) है।
संख्या को बदलने के लिए ताकि सोमवार सप्ताह का पहला दिन हो (1) और रविवार सप्ताह का आखिरी दिन हो (7), इस फ़ंक्शन का उपयोग करते समय दूसरे तर्क के रूप में मान 2 जोड़ें:
Weekday(तारीख, 2)
एकाधिक तिथियों के लिए कार्यदिवस संख्या प्रदर्शित करने के लिए Weekday फ़ंक्शन का उपयोग करना:
Sub WeekdayExample1() MsgBox Weekday(#11/2/2020#, 2) 'रिटर्न: 1 MsgBox Weekday("3.11.20", 2) 'रिटर्न: 2 MsgBox Weekday("4 nov 2020", 2) 'रिटर्न: 3 MsgBox Weekday("5/11/2020 17:30:21", 2) 'रिटर्न: 4 End Sub
कार्यदिवस और सप्ताहांत के बीच अंतर करने के लिए Weekday फ़ंक्शन का उपयोग करना:
Sub WeekdayExample2() If Weekday(Now, 2) < 6 Then MsgBox "कार्यदिवस..." Else MsgBox "यह सप्ताहांत है!" End If End Sub