كيفية تمييز تبويب الورقة النشطة في Excel؟
في مصنف مفتوح، يتميز تبويب الورقة النشطة عن غيره بتبييض التبويب وجعل النص عريضًا بشكل افتراضي. إذا كنت ترغب في جعل تبويب الورقة النشطة أكثر بروزًا في مصنفك، يمكن أن تساعدك الطريقة الموجودة في هذه المقالة.
تمييز تبويب الورقة النشطة باستخدام كود VBA
تمييز تبويب الورقة النشطة باستخدام كود VBA
يرجى القيام بما يلي لتمييز تبويب الورقة النشطة في مصنف Excel مفتوح.
1. في المصنف الذي تريد تمييز تبويب الورقة النشطة فيه، اضغط على مفاتيح Alt + F11 لفتح نافذة Microsoft Visual Basic for Applications.
2. في نافذة Microsoft Visual Basic for Applications، يرجى النقر نقرًا مزدوجًا على ThisWorkbook في الجزء الأيسر، ثم قم بنسخ ولصق كود VBA في نافذة ThisWorkbook (Code). انظر إلى لقطة الشاشة:
كود VBA: تمييز تبويب الورقة النشطة في مصنف مفتوح
Private Sub Workbook_SheetActivate(ByVal Sh As Object)
Dim xSheet As Worksheet
Application.ScreenUpdating = False
For Each xSheet In ThisWorkbook.Worksheets
If xSheet.Name = ActiveSheet.Name Then
xSheet.Tab.ColorIndex = 6
Else
xSheet.Tab.ColorIndex = 2
End If
Next
Application.ScreenUpdating = True
End Sub
3. اضغط على مفاتيح Alt + Q لإغلاق نافذة Microsoft Visual Basic for Applications.
الآن، عند تنشيط ورقة، سيتم تمييز تبويب الورقة باللون الأصفر تلقائيًا كما هو موضح في لقطة الشاشة أدناه:

اكتشف سحر Excel مع Kutools AI
- التنفيذ الذكي: قم بعمليات الخلية، وتحليل البيانات، وإنشاء المخططات - كل ذلك يتم من خلال أوامر بسيطة.
- الصيغ المخصصة: قم بإنشاء صيغ مصممة خصيصًا لتسهيل سير عملك.
- برمجة VBA: كتابة وتطبيق أكواد VBA بسهولة.
- تفسير الصيغ: فهم الصيغ المعقدة بسهولة.
- ترجمة النصوص: تجاوز الحواجز اللغوية داخل جداول البيانات الخاصة بك.
مقالات ذات صلة:
- كيفية الرجوع إلى اسم التبويب في الخلية في Excel؟
- كيفية جعل اسم تبويب الورقة يساوي قيمة الخلية في Excel؟
- كيفية مطابقة قيمة الخلية مع اسم تبويب الورقة أو العكس في Excel؟
أفضل أدوات زيادة الإنتاجية لمجموعة Office
عزز مهاراتك في Excel مع Kutools لـ Excel، وتمتع بكفاءة غير مسبوقة. يقدم Kutools لـ Excel أكثر من300 ميزة متقدمة لتعزيز الإنتاجية وتوفير وقت الحفظ. انقر هنا للحصول على الميزة التي تحتاجها أكثر...
Office Tab يجلب تجربة التبويبات إلى Office، ويجعل عملك أسهل بكثير
- فعّل تحرير وقراءة المستندات عبر التبويبات في Word وExcel وPowerPoint
- افتح وأنشئ مستندات متعددة في تبويبات جديدة ضمن نفس النافذة، بدلاً من فتحها في نوافذ جديدة.
- يمنحك زيادة إنتاجية تصل إلى50% ويوفر عليك مئات النقرات يومياً!