كيفية إنشاء مؤقت العد التنازلي في إكسيل

يمكنك إنشاء مؤقت للعد التنازلي في برنامج Excel يقوم بحساب عدد الأيام والساعات والدقائق حتى التاريخ باستخدام الدالة NOW() .

يوضح المثال التالي خطوة بخطوة كيفية استخدام هذه الوظيفة لإنشاء مؤقت للعد التنازلي عمليًا.

الخطوة 1: أدخل تاريخ العد التنازلي

لنفترض أن اليوم هو 18/07/2023 .

سأقوم بإنشاء مؤقت للعد التنازلي في برنامج Excel يحسب عدد الأيام والساعات والدقائق والثواني حتى 08/01/2023 :

الخطوة 2: إنشاء الصيغ للعد التنازلي

ثم يمكننا استخدام الصيغ التالية لحساب عدد الأيام والساعات والدقائق والثواني حتى 01/08/2023:

• الأيام : =INT(A2-NOW())
• الساعات : =HOUR(A2-NOW())
• الدقائق : =MINUTE(A2-NOW())
• الثواني : =SECOND(A2-NOW())

يمكننا كتابة هذه الصيغ في كل خلية من الخلايا الخاصة بها:

وهذا يخبرنا أن التاريخ 1/8/2023 يبعد 13 يومًا و 14 ساعة و 23 دقيقة و 11 ثانية.

الخطوة 3: تحديث مؤقت العد التنازلي يدويًا

لتحديث العد التنازلي، ما عليك سوى النقر نقرًا مزدوجًا فوق أي خلية في جدول بيانات Excel ثم الضغط على Enter .

سيقوم العد التنازلي بتحديث قيم اليوم والساعة والدقيقة والثانية تلقائيًا بمجرد الضغط على Enter :

الخطوة 4: تحديث مؤقت العد التنازلي تلقائيًا (اختياري)

إذا كنت تريد أن يتم تحديث العد التنازلي تلقائيًا على فترات زمنية محددة، فستحتاج إلى كتابة بعض التعليمات البرمجية البسيطة في VBA.

قبل القيام بذلك، نحتاج إلى التأكد من أن علامة التبويب “المطور” مرئية في الشريط العلوي لبرنامج Excel.

للقيام بذلك، انقر فوق علامة التبويب ملف ، ثم خيارات ، ثم تخصيص الشريط .

ضمن القسم الذي يحمل عنوان علامات التبويب الرئيسية ، حدد المربع الموجود بجوار المطور ، ثم انقر فوق موافق :

بعد ذلك، انقر فوق علامة التبويب “المطور” الموجودة على الشريط العلوي، ثم انقر فوق رمز Visual Basic :

بعد ذلك، انقر فوق علامة التبويب “إدراج” ، ثم انقر فوق “الوحدة النمطية” من القائمة المنسدلة:

بعد ذلك، الصق الكود التالي في محرر الكود الخاص بالوحدة:

 Sub UpdateCountdown()

Range("C2:F2").Calculate
Application.OnTime DateAdd("s", 1, Now), "UpdateCountdown"

End Sub

بعد ذلك، انقر فوق سهم التشغيل الأخضر الصغير لتشغيل كود VBA هذا:

بمجرد إدخال الرمز، لا تتردد في إغلاق محرر VB. سيتم حفظ الرمز تلقائيًا.

سيتم الآن تحديث قيم الأيام والساعات والدقائق والثواني تلقائيًا كل ثانية في جدول البيانات.

مصادر إضافية

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

إكسل: كيفية طرح دقائق من الوقت
Excel: كيفية استخراج الوقت من Datetime
Excel: كيفية تنسيق الوقت بالمللي ثانية