كيفية تكبير جميع التبويبات إلى نفس الحجم في Excel؟

افتراضيًا، تكون الأوراق بحجم تكبير 100%، ولكن يمكنك تكبير التبويب الحالي إلى حجم معين كما تحتاج عن طريق سحب شريط التكبير. ومع ذلك، كيف يمكنك تكبير جميع التبويبات في المصنف إلى نفس الحجم في نفس الوقت؟

تكبير جميع التبويبات إلى نفس الحجم باستخدام Ctrl أو Shift

تكبير جميع التبويبات إلى نفس الحجم باستخدام VBA

تكبير جميع التبويبات إلى نفس الحجم باستخدام Ctrl أو Shift

لتكبير كل أو بعض التبويبات إلى نفس الحجم في مصنف، يمكنك أولاً تحديد علامات تبويب الورقة، ثم تكبيرها.

اضغط باستمرار على Ctrl لتحديد علامات تبويب الأوراق التي تريد تغيير مستويات تكبيرها بشكل جماعي، ثم اسحب شريط التكبير. انظر لقطة الشاشة:

حدد أول تبويب واضغط باستمرار على Shift لتحديد آخر تبويب في شريط علامات التبويب، ثم اسحب شريط التكبير لتغيير مستويات التكبير الخاصة بها.

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

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

عزز قدرات Excel لديك باستخدام أدوات تعمل بالذكاء الاصطناعي. قم بالتنزيل الآن وعش تجربة الكفاءة كما لم يحدث من قبل!

تكبير جميع التبويبات إلى نفس الحجم باستخدام VBA

إذا كنت ترغب في استخدام كود VBA لحل هذه المشكلة، يمكن أن يساعدك الكود التالي.

1. اضغط على مفاتيح Alt + F11 لتمكين نافذة Microsoft Visual Basic for Applications.

2. انقر على إدراج > وحدة، ثم قم بنسخ ولصق الكود في النص الفارغ.

VBA: تصغير أو تكبير جميع التبويبات إلى حجم معين

Sub DbZoom()
'UpdatebyExtendoffice20171215
    Dim I As Long
    Dim xActSheet As Worksheet
    Set xActSheet = ActiveSheet
    For I = 1 To ThisWorkbook.Sheets.Count
        Sheets(I).Activate
        ActiveWindow.Zoom = 150
    Next
    xActSheet.Select
End Sub

3. اضغط على مفتاح F5 لتشغيل الكود، وسيتم تغيير مستويات التكبير لجميع علامات التبويب إلى النسبة المئوية المحددة دفعة واحدة.