كيفية استخدام وظيفة vba datepart؟

تم إدراج الدالة VBA DATEPART في فئة التاريخ لوظائف VBA. عند استخدامه في التعليمات البرمجية لـ VBA، يمكنه إرجاع قيمة اليوم من قيمة التاريخ أو الوقت . بعبارات بسيطة، يمكنك الحصول على الثواني أو الدقائق أو الساعات أو الأيام أو الأشهر أو السنوات من قيمة التاريخ أو الوقت.

بناء الجملة

DatePart(الفاصل الزمني، التاريخ، [اليوم الأول من الأسبوع، [الأسبوع الأول من العام]])

الحجج

• الفاصل الزمني : سلسلة لتحديد أي جزء من التاريخ يجب إرجاعه في النتيجة.
• التاريخ : التاريخ الذي يجب أن يعود منه جزء التاريخ.
• [FirstDayOfWeek] : سلسلة لتحديد اليوم الأول من الأسبوع [هذه وسيطة اختيارية وإذا تم حذفها vbSunday افتراضيًا].
  • vbUseSystemDayOfWeek – اعتمادًا على إعدادات النظام.
  • vbSunday – الأحد
  • فبلنداي – الاثنين
  • vbالثلاثاء – الثلاثاء
  • vbالأربعاء – الأربعاء
  • vbالخميس – الخميس
  • vbالجمعة – الجمعة
  • vbالسبت – السبت
• [FirstWeekOfYear] : سلسلة لتحديد الأسبوع الأول من العام [هذه وسيطة اختيارية وإذا تم حذفها vbFirstJan1 بشكل افتراضي].
  • vbSystem – اعتمادًا على إعدادات النظام.
  • vbFirstJan1 – الأسبوع الذي يحدث فيه اليوم الأول من شهر يناير.
  • vbFirstFourDays – الأسبوع الأول الذي يحتوي على أربعة أيام على الأقل في العام الجديد.
  • vbFirstFullWeek – أول أسبوع كامل من العام الجديد.

مثال

لفهم كيفية استخدام وظيفة VBA DATEPART بشكل عملي، يجب عليك الاطلاع على المثال أدناه حيث قمنا بكتابة كود vba باستخدامها:

 Sub example_DATEPART() Range("A2").Value = DatePart("d", Range("A1")) Range("A3").Value = DatePart("h", Range("A1")) Range("A4").Value = DatePart("m", Range("A1")) Range("A5").Value = DatePart("n", Range("A1")) Range("A6").Value = DatePart("q", Range("A1")) Range("A7").Value = DatePart("s", Range("A1")) Range("A8").Value = DatePart("w", Range("A1")) Range("A9").Value = DatePart("ww", Range("A1")) Range("A11").Value = DatePart("y", Range("A1")) Range("A12").Value = DatePart("yyyy", Range("A1")) End Sub

في الكود أعلاه، استخدمنا فاصلًا زمنيًا مختلفًا في DATEPART:

• ‘d’ للحصول على اليوم وعاد 15.
• “h” للحصول على الساعات ولكن بما أنه ليس لدينا وقت في التاريخ فقد أعاد 0 في النتيجة.
• “م” للحصول على الشهر وعاد 1.
• ‘n’ للحصول على الدقائق ولكن بما أنه ليس لدينا وقت في التاريخ فقد أعاد 0 في النتيجة.
• “ف” ليحصل على الربع ويعود 1.
• ‘s’ للحصول على الثواني ولكن بما أنه ليس لدينا وقت في التاريخ فقد أعاد 0 في النتيجة.
• “w” للحصول على يوم الأسبوع وإرجاعه 3.
• “ww” للحصول على الأسبوع من العام وقد عاد 3.
• ‘y’ للحصول على يوم من السنة وإرجاع 15.
• “aaaa” للحصول على العام ورجع إلى 2019.

تعليقات

• إذا تم توفير تاريخ بدون السنة، فسيتم استخدام السنة الحالية.
• إذا كانت القيمة المحددة قيمة غير تاريخ أو تاريخ لا يمكن التعرف عليه كتاريخ، فسيقوم VBA بإرجاع خطأ وقت التشغيل 13.
• لا يعمل تعيين الوسيطة “firstdayofweek” إلا عندما يكون “الفاصل الزمني” إما “w” أو “ww”.