كيف يمكن إدراج أو حذف الصفوف في ورقة محمية؟
عند العمل مع بيانات حساسة أو مشتركة في ورقة عمل Excel، يُعد حماية الورقة أسلوبًا المستخدمة بشكل متكرر لتجنب التغييرات العرضية أو غير المصرح بها. ومع ذلك، وبطبيعة التصميم، تقيّد حماية الورقة أيضًا عملياتٍ معينة، مثل إدراج أو حذف الصفوف، خاصةً في الخلايا المؤمنة. غالبًا ما يواجه المستخدمون مشكلة الحاجة إلى السماح بالتحرير—مثل إدراج أو حذف الصفوف—مع الحفاظ على بقية ورقة العمل محمية. يوضح هذا البرنامج التعليمي طرقًا عملية للإدراج أو حذف الصفوف في ورقة محمية، ويناقش سيناريوهات التطبيق والاحتياطات والحلول البديلة لمساعدتك على إدارة بياناتك بأمان وكفاءة.
الإدراج أو حذف الصفوف في ورقة محمية
VBA: إلغاء الحماية مؤقتًا، ثم الإدراج/الحذف، ثم إعادة الحماية تلقائيًا
الإدراج أو حذف الصفوف في ورقة محمية
يُعد هذا الحل الأنسب للحالات التي ترغب فيها في منح المستخدمين صلاحيات تحرير محدودة، مثل إدراج أو حذف الصفوف، مع الحفاظ على حماية معظم ورقة العمل. فهو يسمح لصفوف أو أقسام بيانات محددة بالبقاء مرنة وقابلة للتحرير، بينما تظل باقي الورقة مؤمنة ضد التغييرات أو الحذف العرضي.
اتبع هذه التعليمات خطوة بخطوة لتمكين إدراج الصفوف وحذفها في ورقة محمية:
1. حدد الصف بأكمله الذي تريد أن يتمكّن المستخدمون من إدراجه أو حذفه. تُحدد هذه الخطوة مكان السماح بهذه العمليات في ورقة العمل المحمية. بعد تحديد الصفوف، انقر بزر الماوس الأيمن على التحديد، ثم اخترتعيين تنسيق الخليةمن القائمة السياقية. انظر لقطة الشاشة:
2.في مربع الحوار الظاهرتعيين تنسيق الخلية، انتقل إلى علامة التبويبالحماية. هنا، قم بإلغاء تحديد خانة الاختيارمؤمنلإلغاء تأمين هذه الخلايا أو الصفوف المحددة. يُعد إلغاء التأمين أمرًا جوهريًّا؛ فبدونه لن يتمكّن المستخدمون من إجراء أي تغييرات، حتى لو كانت لديهم أذونات أخرى. كن حذرًا ولا تقم بإلغاء تأمين المناطق الحساسة التي ترغب في بقائها محميّة. انظر لقطة الشاشة:
3. انقر فوقموافقلإغلاق مربع الحوار. بعد ذلك، انتقل إلى شريط Excel، وانقر فوقمراجعة، ثم اخترحماية الورقةلتمكين حماية ورقة العمل. انظر لقطة الشاشة:
4. في مربع الحوارحماية الورقةالذي يظهر، ستجد قائمة بعنوانالسماح لجميع مستخدمي ورقة العمل هذه بـ. حدد الخيارينإدراج صفوفوحذف الصفوف. وإذا لزم الأمر، أدخل كلمة مرور لحماية الورقة، ثم قم بتأكيدها عند المطالبة. تُعد هذه الخطوة ضرورية لمنح المستخدمين الأذونات المطلوبة للتحرير فقط، مع الحفاظ على أمان باقي الورقة. انظر لقطة الشاشة:
5.أخيرًا، انقر فوقموافقلتمكين حماية الورقة وفقًا للإعدادات الجديدة. بعد ذلك، لن يُسمح بإدراج الصفوف أو حذفها إلا في الصفوف المحددة، وفقًا للأذونات والإلغاءات التي قمت بتكوينها، بينما تبقى باقي ورقة العمل دون تغيير. انظر لقطة الشاشة:
تعمل هذه الطريقة بشكل ممتاز لتلبية معظم الاحتياجات الأساسية، لكن ضع في اعتبارك أنها لا تسمح للمستخدمين بإدراج صفوف أو حذفها خارج النطاقات المفكوكة التي تم منح الإذن لها. لذا، تأكد دائمًا من مراجعة الخلايا المفكوكة قبل تفعيل الحماية، وذلك لتجنب الكشف غير المقصود عن البيانات أو تطبيق حماية غير كافية.
إذا كنت بحاجة إلى السماح بالإدراج أو الحذف عبر مناطق أوسع في الورقة، أو رغبت في مزيدٍ من الأتمتة، ففكّر في الحلول القائمة على VBA الموضَّحة أدناه.
VBA: إلغاء الحماية مؤقتًا، ثم الإدراج/الحذف، ثم إعادة الحماية تلقائيًا
يُعد نهج ماكرو VBA هذا مثاليًا للمستخدمين الذين يحتاجون إلى إدراج أو حذف الصفوف بشكل متكرر في ورقة عمل محمية، دون الحاجة إلى إلغاء الحماية وإعادة تأمين الورقة يدويًا في كل مرة. فبمجرد تشغيل الماكرو، يتم إلغاء حماية الورقة مؤقتًا، وإجراء التعديلات المطلوبة على الصفوف، ثم إعادة حمايتها تلقائيًا—كل ذلك بنقرة زر واحدة. وهو حلٌّ مثالي خصوصًا للمهام التعاونية أو المتكررة، حيث يضمن مرونة في التعامل مع البيانات مع الحفاظ على أمانها المستمر.
تشمل المزايا الرئيسية لهذا النهج تقليل التعرض العرضي للبيانات الحساسة من خلال تقليص فترة إلغاء الحماية، فضلاً عن تجنُّب عناء إدخال كلمات المرور مرارًا وتكرارًا أثناء عمليات التحرير الروتينية. ومع ذلك، يكمن القيد المحتمل في ضرورة تمكين الماكروات، إلى جانب الحاجة إلى فهمٍ أساسي لأمان الماكروات.
1. افتح ورقة العمل التي تريد تمكين هذه الوظيفة فيها. انقر فوق علامة التبويبالمطور(إذا لم تكن علامة تبويب المطور ظاهرة، يمكنك تمكينها عبر)ملف > خيارات > تخصيص الشريط)، ثم انقر فوقVisual Basic. في نافذة محرر VBA التي تظهر، اخترإدراج > وحدة نمطية، والصق الكود التالي في الوحدة النمطية:
Sub InsertRowInProtectedSheet()
Dim ws As Worksheet
Dim pwd As String
Set ws = ActiveSheet
pwd = InputBox("Enter sheet password:", "KutoolsforExcel")
If pwd = "" Then Exit Sub
On Error Resume Next
ws.Unprotect Password:=pwd
If Err.Number <> 0 Then
MsgBox "Incorrect password or unprotect failed!", vbExclamation
Exit Sub
End If
On Error GoTo 0
Dim insertRow As Integer
insertRow = Application.InputBox("Enter row number to insert:", "KutoolsforExcel", Type:=1)
If insertRow > 0 Then
ws.Rows(insertRow).Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove
MsgBox "Row inserted at " & insertRow, vbInformation
End If
ws.Protect Password:=pwd, AllowInsertingRows:=True, AllowDeletingRows:=True
End Sub
Sub DeleteRowInProtectedSheet()
Dim ws As Worksheet
Dim pwd As String
Set ws = ActiveSheet
pwd = InputBox("Enter sheet password:", "KutoolsforExcel")
If pwd = "" Then Exit Sub
On Error Resume Next
ws.Unprotect Password:=pwd
If Err.Number <> 0 Then
MsgBox "Incorrect password or unprotect failed!", vbExclamation
Exit Sub
End If
On Error GoTo 0
Dim delRow As Integer
delRow = Application.InputBox("Enter row number to delete:", "KutoolsforExcel", Type:=1)
If delRow > 0 Then
ws.Rows(delRow).Delete
MsgBox "Row " & delRow & " deleted.", vbInformation
End If
ws.Protect Password:=pwd, AllowInsertingRows:=True, AllowDeletingRows:=True
End Sub2.أغلق محرر VBA. لإدراج صف، اضغط علىAlt + F8 لفتح مربع حوار الماكرو، وحددInsertRowInProtectedSheet، ثم انقر فوقتشغيل؛ ولحذف صف، حددDeleteRowInProtectedSheet، ثم انقر فوقتشغيل. سيتم مطالبتك بإدخال كلمة مرور ورقة العمل وتحديد الصف الذي تريد إدراجه أو حذفه. تقوم هذه الطريقة بإعادة حماية الورقة فورًا بعد إتمام العملية لضمان استمرارية الأمان. تأكد من حفظ ملفك كملف يدعم الماكروات ().xlsm) للاستخدام المستقبلي.
نصائح:
- تأكد دائمًا من امتلاكك كلمة المرور الصحيحة قبل تشغيل الماكرو، إذ إن إدخال كلمة مرور خاطئة سيُعطّل التشغيل الآلي.
- في حال حدوث أي خطأ، يُرجى مراجعة قيم الإدخال والتأكد من تفعيل الماكروات في إعدادات مركز الثقة الخاص بـ 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 يومًا بكامل الميزات— بدون تسجيل، بدون بطاقة ائتمان
- أفضل قيمة— وفِّر مقارنةً بشراء الإضافات بشكل منفصل