كيف يمكن إضافة لون الخلفية إلى الرؤوس أو التذييلات في ورقة Excel عند الطباعة؟
عند العمل في Excel، يُضفي إضافة رؤوس أو تذييلات لمسة احترافية على مستنداتك المطبوعة من خلال تضمين معلومات أساسية مثل أرقام الصفحات، وأسماء الملفات، أو شعارات الشركة. وعلى الرغم من أن ميزات Excel المدمجة تتيح لك إدراج نصوص وصور في الرؤوس والتذييلات التي ستظهر عند الطباعة، فقد ترغب في تمييز هذه الأقسام بلون خلفية لتحسين قابلية القراءة أو تحقيق التناسق مع هوية علامتك التجارية. ومع ذلك، لا يوفّر Excel حاليًا خيارًا مباشرًا لتطبيق لون الخلفية على مناطق الرأس أو التذييل في النسخة المطبوعة، وهو ما قد يكون محبطًا إذا كنت تسعى إلى فصل هذه الأقسام بصريًا عن بياناتك عند الطباعة. فيما يلي بعض الحلول العملية لمحاكاة رأس أو تذييل ملوّن في مخرجات طباعة Excel، لتلبية احتياجات متنوعة ومستويات مختلفة من الراحة التقنية.
إضافة لون الخلفية إلى الرأس أو التذييل باستخدام تعبئة اللون
إضافة لون الخلفية إلى الرأس والتذييل باستخدام VBA
إضافة لون الخلفية إلى الرأس أو التذييل باستخدام تعبئة اللون
تُعدّ هذه الطريقة وسيلةً لتنسيق خلايا ورقة العمل بحيث تحاكي رأسًا أو تذييلًا ملوَّنًا بصريًّا. وبما أن الرؤوس والتذييلات الفعلية التي يتم إنشاؤها عبرتخطيط الصفحةلا تدعم لون الخلفية، فإن تنسيق الصفوف العلوية والسفلى يوفّر بديلًا فعّالًا. وهي الطريقة الأنسب عندما يكون هدفك الرئيسي هو تعزيز الفصل البصري أو تعزيز الهوية البصرية للأوراق المطبوعة، وعندما يمكن عرض محتوى الرأس/التذييل ضمن صفوف ورقة العمل بدلاً من استخدام الرؤوس/التذييلات الحقيقية المخصصة للطباعة.
تشمل قيود هذه الطريقة عدم إمكانية استخدام حقول الرأس/التذييل الديناميكية (مثل أرقام الصفحات)، بالإضافة إلى الحاجة لتكرار هذه الخطوات يدويًا لكل ورقة.
1. انقر فوقتخطيط الصفحة > إعدادات الصفحة.
قبل المتابعة، من المهم ضبط جميع الهوامش على0 لتعظيم مساحة ورقة العمل القابلة للاستخدام وضمان محاذاة المناطق الملوَّنة تمامًا في أعلى وأسفل كل صفحة مطبوعة، مما يُحقِّق تأثير خلفية رأس أو تذييل احترافية عند طباعة المستند.
2. في مربع حوارإعدادات الصفحة، انتقل إلى علامة التبويبالهوامش، واكتب0 في مربعات النص الخاصة بـالأعلى،الرأس،الأسفل، والتذييل. ويضمن ذلك عدم وجود مساحة محجوزة للرؤوس والتذييلات المدمجة في Excel، ويضع محتوى ورقة العمل في أقصى الأعلى والأسفل من الصفحة المطبوعة.
3. انقر فوقموافقلتطبيق تغييرات الهوامش. بعد ذلك، حدد الصف الأول من ورقة العمل (سيعمل هذا الصف بصريًا كرأسك)، ثم انتقل إلىالصفحة الرئيسية > دمج وتوسيطلدمج جميع الأعمدة في هذا الصف في خلية واحدة. ويوفّر ذلك مساحة واسعة لنص الرأس ولون الخلفية.
تلميح: بالنسبة للمستندات ذات الأعمدة المتعددة، تأكد من تحديد ودمج النطاق الصحيح من الخلايا لتغطية منطقة البيانات بالكامل.
4. مع تحديد الخلية المدمجة، انقر فوق زرتعبئة اللون (رمز دلو الطلاء) في علامة التبويبالصفحة الرئيسية، واختر لون الخلفية المطلوب من اللوحة. وسيؤدي ذلك إلى إضافة شريط ملوَّن مرئي في أعلى الورقة ليحاكي خلفية الرأس.
5. إذا كنت ترغب أيضًا في إضافة تذييل ملوّن، فانتقل إلى الصف الأخير ضمن نطاق الطباعة، وحدّده، ثم كرّر خطوات الدمج وتعبئة اللون لإنشاء منطقة ملوّنة في أسفل الصفحة.
للحصول على أفضل النتائج، فكّر في إضافة نص الرأس أو التذييل المخصص مباشرةً داخل هذه المناطق الملوَّنة والمدمجة. ويمكنك ضبط حجم الخط، والمحاذاة، أو التنسيق حسب الحاجة لتتناسب مع متطلبات الطباعة لديك. ضع في اعتبارك أن هذه الطريقة تُعرِّف الرأس والتذييل فقط ضمن منطقة ورقة العمل المرئية. وإذا امتد مستندك عبر صفحات متعددة، فقد تحتاج إلى تكرار خطوات التنسيق هذه يدويًا لكل صفحة مطبوعة، أو استخدام ميزة «الصف العلوي» فيإعدادات الصفحةللرؤوس فقط.
الآن، عند الانتقال إلىملف > طباعةأو الضغط علىCtrl + P، سترى شريطًا ملوّنًا في أعلى (و/أو أسفل) صفحة المعاينة، يُحاكي خلفية رأس الصفحة أو تذييلها.
إذا لم يظهر اللون كما هو متوقع في معاينة الطباعة، فتأكد من أن إعدادات الطابعة ونطاق ورقة العمل متطابقان، وأن منطقة الطباعة تغطي صفوفك المنسَّقة.
إضافة لون الخلفية إلى الرأس والتذييل باستخدام VBA
لأوراق العمل الأكثر تعقيدًا، أو عند التعامل مع صفحات متعددة والرغبة في طريقة أكثر أتمتة لإنشاء مناطق رؤوس وتذييلات ملوّنة على كل صفحة مطبوعة، يمكنك استخدام ماكرو VBA لإضافة هذه التأثيرات بسرعة في جميع أنحاء ورقتك. ويضيف حل VBA هذا صفوفًا ملوّنة معرّفة مسبقًا في بداية ونهاية كل نطاق صفحة، مما يُعيد إنتاج مظهر الرؤوس والتذييلات الملوّنة في الناتج المطبوع بدقة.
هذه الطريقة مثالية خصوصًا لأوراق العمل الكبيرة، أو التقارير القديمة، أو الحالات التي تتطلب تنسيقًا موحدًا عبر صفحات متعددة. ومع ذلك، فهي تتطلب تفعيل وظيفة الماكرو وبعض الخبرة في واجهة VBA. يُرجى ملاحظة أن هذا الأسلوب لا يؤثر على الرأس أو التذييل الفعليين في Excel، بل يُجري تعديلات مباشرة على محتوى ورقة العمل لمحاكاة الطباعة.
1. اضغط علىAlt + F11 لفتح نافذة محررMicrosoft Visual Basic for Applications. إذا كانت هذه هي المرة الأولى التي تستخدم فيها VBA، فقد تحتاج أولًا إلى تمكين علامة التبويبالمطور.
2. في نافذة VBA، انقر فوقإدراج > وحدة نمطية. ثم في منطقة التعليمات البرمجية للوحدة النمطية الجديدة، انسخ والصق الكود التالي:
VBA: إضافة لون الخلفية إلى الرأس والتذييل
Sub FakeHeaderFooter()
'UpdatebyExtendoffice20180628
Dim I, J As Long
Dim xRg As Range
Dim xRow, xCol As Long
Dim xRows, xCols As Long
Dim xDivRow, xDivCol As Long
Dim xTopArr, xButtArr As Variant
Dim PageSize1, PageSize2 As Integer
On Error Resume Next
xTopArr = Array("Top Left", "", "", "Top Center", "", "", "", "")
xButtArr = Array("Bottom Left", "", "", "Bottom Center", "", "", "", "")
PageSize1 = 46
PageSize2 = 8
With ActiveSheet.PageSetup
.TopMargin = Application.InchesToPoints(0)
.BottomMargin = Application.InchesToPoints(0)
.HeaderMargin = Application.InchesToPoints(0)
.FooterMargin = Application.InchesToPoints(0)
.BlackAndWhite = False
End With
Set xRg = ActiveSheet.UsedRange
If xRg Is Nothing Then Exit Sub
xRows = xRg(xRg.Count).Row
xCols = xRg(xRg.Count).Column
If xRows < 46 Then xRows = 46
If xCol < 8 Then xCol = 8
xDivRow = Int(xRows / PageSize1)
xDivCol = Int(xCols / PageSize2)
If ((xRows Mod PageSize1) > 0) And (xDivRow <> 0) Then xDivRow = xDivRow + 1
If ((xCols Mod PageSize2) > 0) And (xDivCol <> 0) Then xDivCol = xDivCol + 1
If xDivRow = 0 Then xDivRow = 1
If xDivCol = 0 Then xDivCol = 1
Set xRg = Range("A1").Resize(xDivRow * PageSize1, xDivCol * PageSize2)
xRow = 1
xCol = 1
Cells.PageBreak = xlPageBreakNone
For I = 1 To xDivRow * PageSize1 Step PageSize1 + 1
For J = 1 To xDivCol * PageSize2 Step PageSize2
Cells(I, J).Resize(1, PageSize2) = xTopArr
Cells(I, J).Resize(1, PageSize2).Interior.ColorIndex = 34
Cells(I + PageSize1, J).Resize(1, PageSize2) = xButtArr
Cells(I + PageSize1, J).Resize(1, PageSize2).Interior.ColorIndex = 34
Rows(I + PageSize1 + 1).PageBreak = xlManual
Columns(J + PageSize2).PageBreak = xlManual
Next
Next
End Sub
3. اضغط علىF5 أو انقر فوق زرتشغيلفي شريط أدوات VBA لتنفيذ الكود. بعد التنفيذ، سيقوم الماكرو تلقائيًا بإدراج صفوف ملوَّنة في أعلى وأسفل كل نطاق صفحة وفقًا للقيمتين المحددتَين فيPageSize1 (عدد الصفوف لكل صفحة) وPageSize2 (عدد الأعمدة لكل صفحة). وسيتم ملء الصف الأول والصف السابع والأربعون في كل «صفحة» باللون المحدد والنص المعرَّف مسبقًا، ليظهران معًا كرأس وتذييل «مزيفين» عند الانتقال إلى معاينة الطباعة أو طباعة ورقة العمل.
يمكنك تخصيص هذا الماكرو بشكل أكبر ليتوافق تمامًا مع احتياجاتك. على سبيل المثال، لتغيير محتوى الرأس أو التذييل، ما عليك سوى تعديل النص الموجود بين هذين السطرين:
xTopArr = Array(«Top Left», «», «», «Top Center», «», «», «», «»)
xButtArr = Array(«Bottom Left», «», «», «Bottom Center», «», «», «», «»)
إذا كنت ترغب في لون الخلفية مختلف، غيّر قيمةColorIndexهنا:
Cells(I, J).Resize(1, PageSize2).Interior.ColorIndex =34
Cells(I + PageSize1, J).Resize(1, PageSize2).Interior.ColorIndex =34
يستخدم الماكرو مؤشرات ألوان Excel القياسية (ColorIndex) لتمثيل الألوان. وللمعاينة المسبقة لمجموعة متنوعة من الألوان، يمكنك الرجوع إلى دليل ColorIndex من Microsoft أو استخدام منتقي الألوان في Excel لاختيار القيم التي تتماشى مع هويتك البصرية أو تفضيلاتك التصميمية.
ملاحظة: احفظ عملك قبل تشغيل ماكروهات VBA، لأن هذه الإجراءات لا يمكن التراجع عنها باستخدام وظيفة التراجع القياسية. وبما أن هذا الماكرو يُعدّل محتوى ورقة العمل، فتأكد من أن منطقة الطباعة صحيحة، وقم بتعديل المعلمتينPageSize1 وPageSize2 وفقًا لاحتياجات الورق والتخطيط الخاصة بك. قد تضيف هذه الطريقة صفوفًا إضافية وتؤدي إلى إزاحة البيانات الموجودة للأسفل، لذا راجع تخطيطك بعد تشغيل الماكرو.
إذا واجهت مشكلات في ظهور المناطق الملوَّنة كما هو متوقع عند الطباعة—مثل اختفاء اللون أو اقتطاعه—فتأكد من تفعيل خيار طباعة لون الخلفية في إعدادات الطابعة المتقدمة، وتحقق من ضبط منطقة الطباعة في ورقة العمل بشكل صحيح. ويتطلب كلٌّ من النهجين، سواء باستخدام تعبئة اللون أو VBA، الحذر الشديد بشأن إعدادات الهوامش ونطاق الطباعة، إذ قد يؤدي أي إعداد غير دقيق إلى سوء المحاذاة أو تلوين جزئي.
اختر الحل الذي يناسب إصدار Excel الخاص بك، وتخطيط الصفحة، ودرجة تعقيد احتياجاتك من الرأس/التذييل، وما إذا كانت الأتمتة أو التحكم في التصميم أكثر أهمية بالنسبة لك. يعمل تلوين الرأس/التذييل بشكل أفضل في العروض التقديمية، وصفحات الغلاف، أو المطبوعات ذات العلامة التجارية عندما لا تكون حقول الرأس/التذييل الفعلية مطلوبة للتحديث ديناميكيًا عبر الصفحات.
أفضل أدوات الإنتاجية لمكتبتك
عزِّز مهاراتك في 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 وPowerPoint بالإضافة إلى Office Tab Pro
- برنامج تثبيت واحد، ترخيص واحد— الإعداد خلال دقائق (جاهز لـ MSI)
- يعمل بشكل أفضل معًا— إنتاجية ميسَّرة عبر تطبيقات Office
- تجربة مجانية لمدة 30 يومًا بكامل الميزات— بدون تسجيل، بدون بطاقة ائتمان
- أفضل قيمة— وفِّر مقارنةً بشراء الإضافات بشكل منفصل