Skip to main content

Kutools for Office — مجموعة واحدة. خمسة أدوات. أنجز المزيد.

كيفية تحديد تنسيق التاريخ أو الوقت والتاريخ في رأس الصفحة أو تذييلها؟

Author Xiaoyang Last modified

عند استخدام Excel، قد تحتاج غالبًا إلى تضمين التاريخ أو الوقت الحالي في رأس أو تذييل ورقة العمل الخاصة بك لأغراض مثل طباعة التقارير أو تتبع مراجعات المستندات. افتراضيًا، إذا قمت بإدراج تاريخ أو وقت في الرأس أو التذييل باستخدام رمز &[Date] أو &[Time]، سيعرض Excel هذه العناصر باستخدام تنسيق التاريخ والوقت المحدد بواسطة إعدادات المنطقة الخاصة بنظام Windows الخاص بك. هذا السلوك يعني أنه لا يمكنك تخصيص كيفية ظهور التاريخ أو الوقت في الرأس أو التذييل مباشرةً — مثل عرض "أبريل ٢٣، ٢٠٢٤" بدلاً من "٤/٢٣/٢٠٢٤" — باستخدام الوظائف المدمجة.

يمكن أن تكون هذه القيود مشكلة إذا كنت بحاجة إلى أن تتطابق مستنداتك مع دلائل الأنماط المؤسسية أو التفضيلات الإقليمية أو الشخصية فيما يتعلق بتقديم التاريخ والوقت. على سبيل المثال، قد ترغب في عرض التاريخ بتنسيق "شهر يوم، سنة" أو الجمع بين التاريخ والوقت ("أبريل ٢٣، ٢٠٢٤ ١٨:٠٥") في رؤوس أو تذييلات المستندات. يوضح لقطة الشاشة التالية تنسيق تاريخ مخصص في رأس ورقة العمل:

format date in header

للتعامل مع هذا، ستحتاج إلى استخدام VBA (Visual Basic for Applications) لضبط الرأس أو التذييل برمجيًا إلى تنسيق التاريخ أو الوقت والتاريخ الذي تريده. توفر هذه الطريقة مرونة وتتيح لك تجاوز قيود أدوات الرأس أو التذييل المدمجة في Excel.

تحديد تنسيق التاريخ أو الوقت والتاريخ في الرأس أو التذييل باستخدام كود VBA


arrow blue right bubble تحديد تنسيق التاريخ أو الوقت والتاريخ في الرأس أو التذييل باستخدام كود VBA

لتخصيص تنسيق التاريخ أو الوقت والتاريخ في الرأس أو التذييل، يمكنك استخدام كود VBA بسيط. هذا الحل مناسب عندما تحتاج إلى عرض تنسيق مرن ومخصص غير محدود بإعدادات منطقتك. يرجى اتباع الخطوات التالية:

١. افتح ورقة العمل حيث تريد إدراج وتخصيص تنسيق التاريخ في الرأس أو التذييل. من المفيد التبديل إلى عرض تخطيط الصفحة حتى تتمكن بسهولة من معاينة كيفية ظهور رؤوس وتذييلات الصفحات أثناء الطباعة. لتمكين عرض تخطيط الصفحة، انقر فوق زر تخطيط الصفحة الموجود في الزاوية اليمنى السفلى من نافذة Excel، كما هو موضح أدناه:

click Page Layout button to enable the page layout view

نصيحة: بينما يعتبر التبديل إلى عرض تخطيط الصفحة أمرًا اختياريًا لتشغيل كود VBA، إلا أنه يُوصى به إذا كنت ترغب في تصور تغييرات الرأس / التذييل فورًا.

٢. اضغط على ALT + F11 على لوحة المفاتيح لفتح نافذة محرر Microsoft Visual Basic for Applications (VBA).

٣. في محرر VBA، انقر فوق إدراج > وحدة. سيؤدي ذلك إلى إنشاء وحدة جديدة. انسخ والصق الكود التالي لـ VBA في نافذة الوحدة:

كود VBA: إدراج وتنسيق التاريخ في الرأس أو التذييل:

Sub add_date_header()
ActiveSheet.PageSetup.CenterHeader = Format(Date, "mmmm dd, yyyy")
End Sub
ملاحظات:
  • سيقوم هذا الكود تلقائيًا بإدراج التاريخ الحالي بتنسيقك المختار في الرأس. يمكنك تغيير CenterHeader إلى LeftHeader أو RightHeader أو LeftFooter أو CenterFooter أو RightFooter إذا كنت ترغب في نقل التاريخ المنسق إلى جزء مختلف من الرأس أو التذييل.
  • سلسلة تنسيق التاريخ، على سبيل المثال mmmm dd, yyyy (والتي تنتج "أبريل ٢٣، ٢٠٢٤") يمكن أيضًا تخصيصها لأي رموز تنسيق تاريخ VBA القياسية مثل dd/mm/yyyy، yyyy-mm-dd، أو غيرها حسب الحاجة.
  • انتبه إلى صيغة سلسلة تنسيق التاريخ - قد يؤدي استخدام رموز التنسيق غير الصحيحة إلى أخطاء أو نتائج غير متوقعة. تأكد دائمًا أن النتيجة تتطابق مع نيتك في عرض تخطيط الصفحة.

٤. بعد إدخال ومراجعة الكود الخاص بك، اضغط على F5 أو انقر فوق زر "تشغيل" في محرر VBA لتنفيذ الكود. سيتم عكس تنسيق التاريخ المحدد فورًا في رأس أو تذييل ورقة العمل الخاصة بك. يمكنك التحقق من النتيجة في عرض تخطيط الصفحة، كما هو موضح في لقطة الشاشة التالية:

run the code to get the specified date format in header or footer

إذا كنت بحاجة إلى تحديث التاريخ ديناميكيًا كل مرة يتم فيها فتح أو طباعة المصنف، ستحتاج إلى إعادة تشغيل كود VBA أو تعيينه لحدث Workbook Open/BeforePrint. تعتمد هذه الطريقة القائمة على VBA على التشغيل اليدوي، وبالتالي فإن محتوى الرأس / التذييل لا يتم تحديثه تلقائيًا مع كل يوم جديد ما لم يتم إعادة تشغيل الكود.

نصائح: لتشمل الوقت الحالي مع التاريخ بتنسيق مخصص، يمكنك استخدام كود VBA التالي. هذا مفيد عندما تتطلب تقاريرك ختم زمني، أو عندما تريد تتبع كلاً من التاريخ والوقت عند الطباعة أو التصدير في رأس أو تذييل ورقة العمل الخاصة بك:

Sub Change_Format()
  ActiveSheet.PageSetup.CenterHeader = Format(Now, "MMMM DD, YYYY HH:MM:SS")
End Sub

ستكون النتيجة رأس أو تذييل يعرض كل من التاريخ والوقت بالتنسيق المحدد. على سبيل المثال، إذا قمت بتعيين التنسيق إلى "mmmm dd, yyyy hh:mm"، سترى عرضًا مثل "أبريل ٢٣، ٢٠٢٤ ١٨:٠٥".

وستحصل على النتيجة التالية:

run the code to get the specified date and time format in header or footer

تحذير: عند حفظ المصنفات التي تحتوي على ماكرو VBA، يجب حفظ ملفك كمصنف ممكّن الماكرو (.xlsm) لضمان الاحتفاظ بالكود الخاص بك للاستخدام المستقبلي. قد تقيد بعض إعدادات Excel تشغيل الماكرو؛ إذا واجهت أخطاء، تحقق من إعدادات أمان الماكرو الخاصة بك ضمن File > Options > Trust Center > Trust Center Settings > Macro Settings. إذا لم يتم تحديث الرأس أو التذييل كما هو متوقع، تأكد من تشغيل الماكرو على ورقة العمل الصحيحة وأن الكود الخاص بك يشير إلى الجزء المناسب من الرأس / التذييل.

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

تشمل الأساليب البديلة لتخصيص تنسيقات التاريخ في الرأس أو التذييل:
- كتابة التاريخ / الوقت يدويًا في الرأس أو التذييل (بسيطة ولكن ثابتة)يمكنك إدخال أي تاريخ أو وقت بالتنسيق الذي تريده عن طريق النقر مرتين يدويًا في الرأس أو التذييل في عرض تخطيط الصفحة. ومع ذلك، لا يتم تحديث هذا الأسلوب تلقائيًا عند فتح أو طباعة ورقة العمل. إنه حل سريع للمستندات الثابتة ولكنه يتطلب تحديثًا يدويًا للتاريخ الجديد.

باختصار، يعد استخدام VBA الحل الأمثل عندما تريد تنسيقات تاريخ أو وقت وتاريخ مرنة ومخصصة وديناميكية في الرؤوس أو التذييلات. تأكد من التحقق من سلاسل التنسيق الخاصة بك واحفظ دائمًا الماكرو الخاص بك بشكل صحيح. إذا واجهت مشكلات مع تنسيقات التاريخ القديمة أو غير المتغيرة بعد تشغيل الكود، تحقق مرتين من إعدادات أمان الماكرو أو حاول حفظ وإعادة فتح المصنف الخاص بك.

a screenshot of kutools for excel ai

اكتشف سحر Excel مع Kutools AI

  • التنفيذ الذكي: قم بعمليات الخلية، وتحليل البيانات، وإنشاء المخططات - كل ذلك يتم من خلال أوامر بسيطة.
  • الصيغ المخصصة: قم بإنشاء صيغ مصممة خصيصًا لتسهيل سير عملك.
  • برمجة VBA: كتابة وتطبيق أكواد VBA بسهولة.
  • تفسير الصيغ: فهم الصيغ المعقدة بسهولة.
  • ترجمة النصوص: تجاوز الحواجز اللغوية داخل جداول البيانات الخاصة بك.
عزز قدرات Excel لديك باستخدام أدوات تعمل بالذكاء الاصطناعي. قم بالتنزيل الآن وعش تجربة الكفاءة كما لم يحدث من قبل!

أفضل أدوات الإنتاجية لمكتب العمل

🤖 Kutools AI Aide: أحدث ثورة في تحليل البيانات اعتمادًا على: التنفيذ الذكي |  توليد الأكواد |  إنشاء الصيغ المخصصة |  تحليل البيانات وتوليد الرسوم البيانية |  استخدام Kutools Functions...
ميزات شائعة: البحث، تمييز أو وضع علامة على المكررات | حذف الصفوف الفارغة | دمج الأعمدة أو الخلايا بدون فقدان البيانات | تقريب بدون الصيغة...
بحث متقدم: بحث بمعايير متعددة VLookup | بحث بقيم متعددة VLookup | بحث في عدة ورقات VLookup | مطابقة غامضة...
قائمة منسدلة متقدمة: إنشاء قائمة منسدلة بسرعة | قائمة منسدلة معتمدة | قائمة منسدلة متعددة الاختيارات...
مدير الأعمدة: إضافة عدد محدد من الأعمدة | نقل الأعمدة | تبديل حالة إظهار الأعمدة المخفية | مقارنة النطاقات والأعمدة...
ميزات مميزة: التركيز على الشبكة | عرض التصميم | شريط الصيغ المحسن | مدير أدوات المصنف وورقة العمل | مكتبة النص التلقائي | منتقي التاريخ | دمج البيانات | تشفير/فك تشفير الخلايا | إرسال البريد الإلكتروني حسب الجدول | مرشح متقدم | تصفية خاصة (تصفية الخلايا التي تحتوي على خط عريض/مائل/يتوسطه خط...)...
أفضل15 مجموعة أدوات:12 أداة نصية (إضافة نص، حذف الأحرف المحددة، ...) | أكثر من50 نوع رسم بياني (مخطط جانت، ...) | أكثر من40 صيغة عملية (حساب العمر بناءً على تاريخ الميلاد، ...) |19 أداة إدراج (إدراج رمز الاستجابة السريعة، إدراج صورة من المسار، ...) |12 أداة تحويل (تحويل إلى كلمات، تحويل العملة، ...) |7 أدوات دمج وتقسيم (دمج متقدم للصفوف، تقسيم الخلايا، ...) | ... والمزيد
استخدم Kutools بلغتك المفضلة – يدعم الإنجليزية، الإسبانية، الألمانية، الفرنسية، الصينية، وأكثر من40 لغة أخرى!

عزز مهاراتك في Excel باستخدام Kutools لـ Excel، واختبر كفاءة غير مسبوقة. Kutools لـ Excel يوفر أكثر من300 ميزة متقدمة لزيادة الإنتاجية وتوفير وقت الحفظ. انقر هنا للحصول على الميزة الأكثر أهمية بالنسبة لك...


Office Tab يجلب واجهة التبويب إلى Office ويجعل عملك أسهل بكثير

  • تفعيل تحرير وقراءة عبر التبويبات في Word، Excel، PowerPoint، Publisher، Access، Visio وProject.
  • افتح وأنشئ عدة مستندات في تبويبات جديدة في نفس النافذة، بدلاً من نوافذ مستقلة.
  • يزيد إنتاجيتك بنسبة50%، ويقلل مئات النقرات اليومية من الفأرة!

جميع إضافات Kutools. مثبت واحد

حزمة Kutools for Office تجمع بين إضافات Excel وWord وOutlook وPowerPoint إضافة إلى Office Tab Pro، وهي مثالية للفرق التي تعمل عبر تطبيقات Office.

Excel Word Outlook Tabs PowerPoint
  • حزمة الكل في واحد — إضافات Excel وWord وOutlook وPowerPoint + Office Tab Pro
  • مثبّت واحد، ترخيص واحد — إعداد في دقائق (جاهز لـ MSI)
  • الأداء الأفضل معًا — إنتاجية مُبسطة عبر تطبيقات Office
  • تجربة كاملة لمدة30 يومًا — بدون تسجيل، بدون بطاقة ائتمان
  • قيمة رائعة — وفر مقارنة بشراء الإضافات بشكل منفرد