كيفية استرداد كلمة مرور حماية ورقة العمل المفقودة في Excel؟
نقوم دائمًا بتعيين كلمات مرور لحماية بعض أوراق العمل المهمة من التلف أو التعديل بواسطة الآخرين. لكن إذا نسيت كلمات المرور الخاصة بك ، كيف يمكنك أن تفعل؟ لحسن الحظ ، يدعم Excel بعض أكواد VBA لاستعادة كلمة مرور حماية ورقة العمل المفقودة. يمكنك التعامل مع هذه المشكلة على النحو التالي:
استرجع كلمة مرور حماية ورقة العمل المفقودة في Excel باستخدام كود VBA
المزيد من البرامج التعليمية لحماية ورقة العمل ...
استرجع كلمة مرور حماية ورقة العمل المفقودة في Excel باستخدام كود VBA
يمكن أن تساعدك التعليمات البرمجية لـ VBA التالية على إلغاء كلمات المرور الأصلية بسرعة في ورقة العمل.
1. افتح ورقة العمل الخاصة بك المحمية من قبل.
2. اضغط باستمرار على ALT + F11 مفاتيح ، ويفتح نافذة ميكروسوفت فيسوال باسيك للتطبيقات.
3. انقر إدراج > وحدة، والصق الكود التالي في ملف نافذة الوحدة.
كود فبا: استعادة كلمة مرور حماية ورقة العمل المفقودة
Sub PasswordRecovery()
Dim i As Integer, j As Integer, k As Integer
Dim l As Integer, m As Integer, n As Integer
Dim i1 As Integer, i2 As Integer, i3 As Integer
Dim i4 As Integer, i5 As Integer, i6 As Integer
On Error Resume Next
For i = 65 To 66: For j = 65 To 66: For k = 65 To 66
For l = 65 To 66: For m = 65 To 66: For i1 = 65 To 66
For i2 = 65 To 66: For i3 = 65 To 66: For i4 = 65 To 66
For i5 = 65 To 66: For i6 = 65 To 66: For n = 32 To 126
ActiveSheet.Unprotect Chr(i) & Chr(j) & Chr(k) & _
Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & Chr(i3) & _
Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)
If ActiveSheet.ProtectContents = False Then
MsgBox "One usable password is " & Chr(i) & Chr(j) & _
Chr(k) & Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & _
Chr(i3) & Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)
Exit Sub
End If
Next: Next: Next: Next: Next: Next
Next: Next: Next: Next: Next: Next
End Sub
4. ثم اضغط F5 مفتاح لتشغيل هذا الرمز ، وسوف يظهر مربع موجه ، انقر فوق OK لإغلاقه ، وسيتم إلغاء كلمات المرور الخاصة بورقة العمل المحمية مرة واحدة.
الملاحظات:
1. باستخدام هذا الرمز ، يمكنك فقط استعادة كلمة مرور واحدة لحماية ورقة العمل في كل مرة ، إذا كانت هناك أوراق عمل محمية متعددة ، فأنت بحاجة إلى تطبيق هذا الرمز واحدًا تلو الآخر.
2. الكود أعلاه يأتي من http://excelzoom.com/2009/08/how-to-recover-lost-excel-passwords/.
قم بحماية أوراق عمل متعددة بسهولة في نفس الوقت بكلمة مرور في Excel:
• حماية أوراق العمل فائدة كوتولس ل إكسيل يمكن أن تساعدك على حماية أوراق عمل متعددة مجمعة بنفس كلمة المرور. كما يوفر أداة مساعدة لإلغاء حماية أوراق العمل هذه في نفس الوقت. قم بتنزيل الإصدار المجاني الكامل من Kutools for Excel لمدة 30 يومًا الآن!
مقالات ذات صلة
كيف تحمي أوراق عمل متعددة في وقت واحد في إكسيل؟
كيفية إلغاء حماية أوراق عمل متعددة مرة واحدة في Excel؟
أفضل أدوات إنتاجية المكتب
عزز مهاراتك في Excel باستخدام Kutools for Excel، واختبر كفاءة لم يسبق لها مثيل. يقدم Kutools for Excel أكثر من 300 ميزة متقدمة لتعزيز الإنتاجية وتوفير الوقت. انقر هنا للحصول على الميزة التي تحتاجها أكثر...
يجلب Office Tab الواجهة المبوبة إلى Office ، ويجعل عملك أسهل بكثير
- تمكين التحرير والقراءة المبوبة في Word و Excel و PowerPointوالناشر والوصول و Visio والمشروع.
- فتح وإنشاء مستندات متعددة في علامات تبويب جديدة من نفس النافذة ، بدلاً من النوافذ الجديدة.
- يزيد من إنتاجيتك بنسبة 50٪ ، ويقلل مئات النقرات بالماوس كل يوم!