كيفية تجميع الصفوف وفك تجميعها في ورقة العمل المحمية؟
كما نعلم جميعًا ، في ورقة العمل المحمية ، هناك العديد من القيود بالنسبة لنا لتطبيق بعض العمليات. على سبيل المثال ، لا يمكننا التبديل بين البيانات المجمعة وغير المجمعة. هل هناك طريقة لتجميع الصفوف أو فك تجميعها في ورقة عمل محمية؟
قم بتجميع الصفوف وفك تجميعها في ورقة عمل محمية برمز VBA
قم بتجميع الصفوف وفك تجميعها في ورقة عمل محمية برمز VBA
ربما ، لا توجد طريقة أخرى جيدة لحل هذه المشكلة ولكن باستخدام رمز VBA ، يرجى القيام بما يلي:
1. قم بتنشيط ورقة العمل التي تريد استخدامها ، يرجى التأكد من أن ورقة العمل ليست محمية بعد.
2. ثم اضغط باستمرار على ALT + F11 مفاتيح ، ويفتح نافذة ميكروسوفت فيسوال باسيك للتطبيقات.
3. انقر إدراج > وحدة، والصق الكود التالي في ملف نافذة الوحدة.
كود فبا: تجميع الصفوف وفك تجميعها في ورقة عمل محمية
Sub EnableOutlining()
'Update 20140603
Dim xWs As Worksheet
Set xWs = Application.ActiveSheet
Dim xPws As String
xPws = Application.InputBox("Password:", xTitleId, "", Type:=2)
xWs.Protect Password:=xPws, Userinterfaceonly:=True
xWs.EnableOutlining = True
End Sub
4. ثم اضغط F5 مفتاح لتشغيل هذا الرمز ، وسيظهر مربع موجه لتذكيرك بإدخال كلمة المرور لحماية ورقة العمل الحالية. انظر لقطة الشاشة:
5. ثم اضغط OK، تمت حماية ورقة العمل الخاصة بك ، ولكن يمكنك توسيع رموز المخطط التفصيلي وتقليصها في ورقة العمل المحمية هذه ، راجع لقطة الشاشة:
ملاحظة: إذا كانت ورقة العمل الخاصة بك محمية بالفعل ، فلن يعمل هذا الرمز.
أفضل أدوات إنتاجية المكتب
ارفع مهاراتك في برنامج Excel باستخدام Kutools for Excelوتجربة كفاءة لم يسبق لها مثيل. Kutools for Excel يقدم أكثر من 300 ميزة متقدمة لتعزيز الإنتاجية وتوفير الوقت. انقر هنا للحصول على الميزة التي تحتاجها أكثر...
Office Tab يجلب الواجهة المبوبة إلى Office ، ويجعل عملك أسهل بكثير
- تمكين التحرير والقراءة المبوبة في Word و Excel و PowerPointوالناشر والوصول و Visio والمشروع.
- فتح وإنشاء مستندات متعددة في علامات تبويب جديدة من نفس النافذة ، بدلاً من النوافذ الجديدة.
- يزيد من إنتاجيتك بنسبة 50٪ ، ويقلل مئات النقرات بالماوس كل يوم!












