كيفية استخدام وظيفة weekdayname في vba (مع مثال)

يمكنك استخدام الدالة WeekdayName في VBA للحصول على اسم يوم الأسبوع من تاريخ معين.

إليك طريقة شائعة لاستخدام هذه الوظيفة عمليًا:

 Sub FindWeekdayName()
    
Dim i As Integer

For i = 2 To 9
    Range(" B " & i) = WeekdayName(Weekday(Range(" A " & i)))
Next i
    
End Sub

سيبحث هذا الماكرو المحدد عن اسم يوم الأسبوع لكل تاريخ في النطاق A2:A9 ويعرض النتائج في النطاق B2:B9 .

يوضح المثال التالي كيفية استخدام الدالة WeekdayName عمليًا.

ملاحظة : إذا كنت تفضل إرجاع يوم الأسبوع كعدد صحيح، فيجب عليك استخدام وظيفة “أيام الأسبوع” بدلاً من ذلك.

مثال: كيفية استخدام الدالة WeekdayName في VBA

لنفترض أن لدينا عمود التاريخ التالي في Excel:

لنفترض أننا نريد الحصول على اسم يوم الأسبوع لكل تاريخ وعرض النتائج في العمود B.

يمكننا إنشاء الماكرو التالي للقيام بذلك:

 Sub FindWeekdayName()
    
Dim i As Integer

For i = 2 To 9
    Range(" B " & i) = WeekdayName(Weekday(Range(" A " & i)))
Next i
    
End Sub

عندما نقوم بتشغيل هذا الماكرو، نحصل على الإخراج التالي:

يعرض العمود B اسم يوم الأسبوع لكل تاريخ في العمود A.

على سبيل المثال:

• 01/01/2023 هو يوم الأحد .
• 1/4/2023 هو يوم الاربعاء .
• 23/02/2023 هو يوم الخميس .

وما إلى ذلك وهلم جرا.

ملاحظة : يمكنك العثور على الوثائق الكاملة لوظيفة VBA WeekdayName هنا .

مصادر إضافية

تشرح البرامج التعليمية التالية كيفية تنفيذ المهام الشائعة الأخرى في VBA:

كيفية مقارنة التواريخ في VBA
كيفية تحويل التاريخ إلى رقم الأسبوع في VBA
كيفية حساب الأيام بين تاريخين في VBA