كيفية تطبيق تجميد / إلغاء تجميد الأجزاء الثابتة على عدة أوراق عمل دفعة واحدة؟
عند العمل مع مصنفات 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
أفضل أدوات الإنتاجية لمكتب العمل
عزز مهاراتك في 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 يومًا — بدون تسجيل، بدون بطاقة ائتمان
- قيمة رائعة — وفر مقارنة بشراء الإضافات بشكل منفرد