كيفية تطبيق تجميد / إلغاء تجميد الأجزاء الثابتة على عدة أوراق عمل دفعة واحدة؟

عند العمل مع مصنفات Excel كبيرة تحتوي على العشرات أو حتى المئات من أوراق العمل، قد تحتاج بشكل متكرر إلى الاحتفاظ ببعض الصفوف أو الأعمدة مرئية عن طريق تجميد الأجزاء الثابتة. ومع ذلك، فإن وظيفة تجميد الأجزاء الثابتة الافتراضية في Excel تعمل فقط على ورقة العمل النشطة، مما يجعل الأمر يستغرق وقتًا طويلاً لتكرار هذا الإجراء يدويًا على كل ورقة. إذا كنت بحاجة إلى تجميد (أو لاحقًا إلغاء تجميد) نفس الصفوف أو الأعمدة عبر جميع أوراقك، فهل هناك طريقة لتطبيق هذا الإعداد على كل ورقة عمل دفعة واحدة - مما يوفر لك الجهد ويقلل من احتمالية تفويت ورقة؟

تطبيق تجميد الأجزاء الثابتة على جميع أوراق العمل دفعة واحدة باستخدام كود VBA

تطبيق إلغاء تجميد الأجزاء الثابتة على جميع أوراق العمل دفعة واحدة باستخدام كود VBA

تطبيق تجميد / إلغاء تجميد الأجزاء الثابتة على جميع أوراق العمل دفعة واحدة بنقرة واحدة باستخدام Kutools لـ Excel

تطبيق تجميد الأجزاء الثابتة على جميع أوراق العمل دفعة واحدة باستخدام كود VBA

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

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

2. اضغط على ALT + F11 لفتح نافذة Microsoft Visual Basic for Applications.

3. في نافذة محرر VBA، انقر فوق إدراج > وحدة، ثم انسخ والصق الكود التالي للـ VBA في نافذة الوحدة:

كود VBA: تجميد جميع أوراق العمل دفعة واحدة في Excel

Sub Freeze()
'Updateby Extendoffice
Dim Ws As Worksheet
Application.ScreenUpdating = False
For Each Ws In Application.ActiveWorkbook.Worksheets
    Ws.Activate
    With Application.ActiveWindow
        .FreezePanes = True
    End With
Next
Application.ScreenUpdating = True
End Sub

4. لتنفيذ الكود، اضغط على F5 أو انقر فوق زر التشغيل. سيؤدي ذلك إلى تطبيق تجميد الأجزاء الثابتة في موضع الخلية النشطة لجميع أوراق العمل.

ملاحظة: إذا لم تكن قد حددت جميع أوراق العمل وموضع الخلية النشطة مختلف بين الأوراق، فقد تختلف مواقع تجميد الأجزاء الثابتة من ورقة إلى أخرى. لضمان التناسق، قم دائمًا بمحاذاة الخلية النشطة قبل تشغيل الكود.

تطبيق إلغاء تجميد الأجزاء الثابتة على جميع أوراق العمل دفعة واحدة باستخدام كود VBA

عندما يكون لدى عدة أوراق عمل أجزاء ثابتة مجمدة وتريد إزالة هذا الإعداد من جميع الأوراق دفعة واحدة، يمكن أن توفر لك حلول VBA تسريع العملية بشكل كبير. بدلاً من إلغاء تجميد الأجزاء الثابتة يدويًا لكل ورقة، يقوم الماكرو التالي بإلغاء تجميد جميع الأوراق دفعة واحدة.

1. افتح المصنف الذي يحتوي على أجزاء ثابتة مجمدة عبر عدة أوراق عمل.

2. اضغط على ALT + F11 لتشغيل محرر Microsoft Visual Basic for Applications.

3. انقر فوق إدراج > وحدة، ثم الصق الكود أدناه في نافذة الوحدة:

كود VBA: إلغاء تجميد جميع أوراق العمل دفعة واحدة في Excel

Sub UnFreeze()
'Updateby Extendoffice
Dim Ws As Worksheet
Application.ScreenUpdating = False
For Each Ws In Application.ActiveWorkbook.Worksheets
    Ws.Activate
    With Application.ActiveWindow
        .FreezePanes = False
    End With
Next
Application.ScreenUpdating = True
End Sub

4. اضغط على F5 أو انقر فوق زر التشغيل لتنفيذ الكود. ستتم إزالة الأجزاء المجمدة من جميع الأوراق دفعة واحدة.

تطبيق تجميد / إلغاء تجميد الأجزاء الثابتة على جميع أوراق العمل دفعة واحدة بنقرة واحدة باستخدام Kutools لـ Excel

إذا كنت تفضل عدم استخدام VBA أو تبحث عن طريقة أبسط وخالية من الأكواد، يوفر Kutools لـ Excel وسيلة فعالة لتطبيق تجميد أو إلغاء تجميد الأجزاء الثابتة عبر جميع الأوراق باستخدام قائمة مباشرة. هذه الميزة مثالية للمستخدمين الذين يبحثون عن حل سريع وموثوق به بأقل عدد من الخطوات ولا يحتاجون إلى إعداد ماكرو. تعمل أدوات تجميد الأجزاء الثابتة المتعددة وإلغاء تجميد الأجزاء الثابتة المتعددة بسلاسة لإعداد أو إزالة مواقع الأجزاء المجمدة في كل ورقة عمل بعملية واحدة. وهذا يوفر وقتًا كبيرًا في المصنفات الكبيرة ويقلل من فرص عدم الاتساق بين الأوراق.

بعد تثبيت Kutools لـ Excel، يرجى اتباع الخطوات التالية:

1. اختر الخلية التي ترغب في تجميد الأجزاء الثابتة فيها في جميع أوراق العمل (على سبيل المثال، حدد الخلية B2 إذا كنت ترغب في الاحتفاظ بالصف الأول والعمود A مرئيين). سيتم تطبيق هذا الموضع بشكل موحد على كل ورقة عمل. انظر إلى لقطة الشاشة:

2. على شريط Excel، انقر فوق Kutools Plus > ورقة العمل > تجميد الأجزاء الثابتة لأوراق العمل المتعددة. انظر لقطة الشاشة:

3. ستتم عملية تجميد الأجزاء الثابتة على الفور في نفس موضع الخلية المحدد (مثل B2)، بحيث يظل العرض لديك متسقًا عبر المصنف بالكامل.

ملاحظة: لإزالة تجميد الأجزاء الثابتة من جميع أوراق العمل في عملية واحدة، حدد Kutools Plus > ورقة العمل > إلغاء تجميد الأجزاء الثابتة لأوراق العمل المتعددة. يوفر هذا المرونة اللازمة للتبديل في العرض عند العمل مع بيانات كبيرة أو معقدة. تتميز هذه الوظيفة بأنها مفيدة بشكل خاص أثناء إعداد القوالب، اجتماعات المجلس، أو عندما تحتاج إلى تنقل سريع ومتسق.

عرض توضيحي: تطبيق تجميد / إلغاء تجميد الأجزاء الثابتة على جميع أوراق العمل دفعة واحدة بنقرة واحدة باستخدام Kutools لـ Excel