فك حماية شيتات ملفات الإكسل بجمع إصداراتها وامتداداتها

[أ / محمد صالح 952]

بارك الله فيك وجزاك كل خير

شكرا لك أخي صافي

رزقنا الله وإياك شربة من ماء الجنة الصافي

السلام عليكم ورحمة الله وبركاته

الصحيح ومنذ زمن طويل وانا ابحث عن برنامج يفك الكلمة السرية أو المرور وجدت برامج كثيرة لكن لم يكن احد من هذه البرامج يفي بالغرض

والبرنامج قيم كثيراً جداً

مشكورين جميع القائمين على هذا الصرح العظيم

الله يعطيكوا الف الف عافية

الحمد لله أخي عصام أنك وزجدت ما تبحث عنه هنا

جزاكم الله كل خير

وإياك أخي الكريم

[hassanhoot 0]

بارك الله فيك وجزاك كل خير

شكرا لك أخي صافي

رزقنا الله وإياك شربة من ماء الجنة الصافي

السلام عليكم ورحمة الله وبركاته

الصحيح ومنذ زمن طويل وانا ابحث عن برنامج يفك الكلمة السرية أو المرور وجدت برامج كثيرة لكن لم يكن احد من هذه البرامج يفي بالغرض

والبرنامج قيم كثيراً جداً

مشكورين جميع القائمين على هذا الصرح العظيم

الله يعطيكوا الف الف عافية

الحمد لله أخي عصام أنك وزجدت ما تبحث عنه هنا

جزاكم الله كل خير

وإياك أخي الكريم

[الجزيرة 23]

أخي محمد صالح

أحمد الله أن المنتدى يضم مشرفاً مثلك : )

عمل أكثر من رائع

[سما بودي 3]

السلام عليكم ورحمة الله وبركاته

هل هذه الطريقة تفلح في فك كلمة السر للأكواد داخل البرنامج ام لا حيث انني قد نسيت كلمة المرور

[eng_amr 0]

جربت اللى قلت عليه ومفتحش برده

لما جيت افتحه قال ادخل كلنه المرور

ضغط على فك الحمايه لا تنفع الضغط عليها لان قائمه ادخال كلمه السر مفتوحه

ما الحل

ساعدونى الملف مهم

[حاتم 14169 2]

كل الشكر اخي الفاضل

[الغدارر 0]

جربت الطريقة وبصراحة كانت روعة جدا وناجحة

[islam7676 0]

شكراااااااااااااااااااااااااااااااااااااااااااااااااااااا

جزاك الله خيراااااااااااااا

و لكن لو امكن معلومات عن فك حمايه المصنف لانها مشكله كبيره جداااااااااااا

[م.مهند القانوع 22]

نرجو المساعدة في فك حماية المصنف و بارك الله فيكم يا طاقم منتدى اوفيسنا

[ريان أحمد 35]

بارك الله فيك وجعلها الله في ميزان حسناتك

وأرضى الله عليك والديك وإن شاء الله الفردوس الأعلى

[nofal.saad 2]

شكرا جزيلا رائع

[شحادة بشير 20]

ما شاء الله تبارك الله

عمل رائع مع أن المدة لا بأس بها حوالي دقيقة

لكن عمل أكثر من رائع

أسأل الله أن يجعلك مباركأً أينما كنت

Edited May 17, 2010 by أبو أكرم

[waloasis 0]

جزاك الله كل خير و انعم عليك بعلمه الغزير و زادك ايمانا و علما

[mohammed ahmed ayousef 0]

اخي العزيز مشكور علي موضوعك الجميل

ولاكني كلما حاولت تحميل الملف

فتحت لي صفحة من جديد برجاء المساعده

[johnsmith 0]

السلام عليكم و رحمة الله

جزاك الله خيرا أخي و لكن عندما أحاول تحميل الملف, يقول أن الملف غير موجود

الرجاء المساعدة

[Abosh 0]

يا سلام عليك

شكراً

[hawari_boss 0]

أخي العزير بارك الله فبك على المجهود

لكن الملف لم يقم بعمله رغم اتباعيي للتعليمات كاملة

أستعمل أوفيسس 2003.

شكرا

[أ / محمد صالح 952]

أشكر جميع الإخوة على المرور الطيب

نفعنا الله وإياكم به وبالنسبة للأخ الذي لم يعمل معه البرنامج

فهذا اللبرنامج وظيفته فك كلمات السر لأوراق العمل المحمية بكلمات سر

أما الملفات المحمية بكلمة سر فلها برنامج آخر

برجاء مراجعة الموضوع من أول مشاركة به

[alkulify 0]

100%

[أ / محمد صالح 952]

السلام عليكم ورحمة الله وبركاته

هل هذه الطريقة تفلح في فك كلمة السر للأكواد داخل البرنامج ام لا حيث انني قد نسيت كلمة المرور

شكرا لمرورك أخي الكريم

ولكن هذه الطريقة ل تفلح مع أكواد الفيجوال بيسك للتطبيقات

يوجد برامج أخرى لهذا الغرض

[gamalin 34]

لاحظت في الفترة الأخيرة كثرة الأسئلة عن موضوع نسيان كلمات مرور ملفات الإكسل أو بعض ورقات العمل بالملف

فأحببت أن أشارك إخوتي

وأحبّتي

أعضاء ومشرفي وخبراء منتدانا الرائع

هذه الإضافة

MasNoPass

لفك حماية ملفات الإكسل

وتعمدت تسهيل عملها

فقط تحتاج لإضافة الوظيفة الإضافية:

نسخ المرفق إلى المسار التالي

C:\Documents and Settings\***\Application Data\Microsoft\AddIns

حيث أن C هو قرص النظام و *** هو اسم المستخدم

بالنسبة لمستخدمي إكسل 2003 من خلال:

فتح برنامج الإكسل والضغط على قائمة أدوات tools ===> وظائف إضافية Addins ===> ثم اختر MasNoPass ثم موافق ok

وبالنسبة لمستخدمي إكسل 2007 يتم ذلك من خلال :

فتح برنامج الإكسل والضغط على زر الأوفيس ثم خيارات إكسل Excel options ثم اختيار وظائف إضافية Addins من الجانب الأيمن/الأيسر ثم اذهب go ثم اختيار MasNoPass ثم موافق ok

طريقة العمل:-

بعد تسجيل الوظيفة الإضافية تجد ظهور قائمة جديدة باسم فك الحماية وتحتاج فقط إلى

فتح الملف المحمي ثم الضغط على قائمة فك الحماية واختيار إزالة كلمة المرور

سيتم البدء في عدّ المحاولات والوقت المنقضي في إجراء العملية

بعدها تظهر رسالة تفيد أنه تم إزالة كلمة المرور عن الملف وبعد الضغط على الرسالة ستجد الملف مفكوك بين يديك

وأخيرا أذكّر نفسي وإياكم

بأن الصحابة عليهم رضوان الله كان الواحد منهم إذا أراد أن يدعو لنفسه دعا لأخيه فيقول له الملك آمين ولك مثلها

فلا ينقصني سوى دعائكم

أخوكم

محمد صالح

وأخيرا أذكر بخطورة الموقف وأرجو عدم استعمالها فيما حرّم الله

وعند النقل يجب ذكر المصدر

منتديات أوفيسنا

اللهم قد بلّغت ... اللهم فاشهد

اخانا الكريم بارك الله فيك وعمل اكثر من رائع ولكن هل يمكن ان تتفضل علي بشرح هذا الجزء من الكود للتعلم ليس الا زادك اللع علما ونفعك بما تعلم

Private Function NewCodeWord()

Dim MaxLong As Integer, Ulimit As Integer, Oline As Integer, lng As Integer, Word As String, i As Integer

MaxLong = 9

Oline = 255

Ulimit = 32

lng = Int(MaxLong * Rnd + 1)

Word = ""

For i = 1 To lng - 1

Word = Word + Chr(Int((34 - 33 + 1) * Rnd + 33))

Next i

Word = Word + Chr(Int((Oline - Ulimit + 1) * Rnd + Ulimit))

NewCodeWord = Word

End Function

[أ / محمد صالح 952]

اخي الكريم

هذه الدالة وظيفتها إنشاء كلمة مكونة بحد أقصى 9 حروف

ويتم اختيار كل حرف بصورة عشوائية من خلل كود أسكي الخاص به ثم يتم تحويله إلى حرف

ثم يتم جمع هذه الحروف معا لتكون كلمة ومع كل طول وكل حرف يتم اختبار ذلك ككلمة مرور للملف

فإذا تم الفك يتم بعدها الحفظ

هذه ياختصار عمل الكود الموجود في الإضافة

وكل عام وجميع الخوة والأخوات بكل خير

[احمد فضيله 229]

الاخ محمد mas123

بارك الله فيك و تقبل الله منك صالح الاعمال

[hishoo123 0]

رررررررررررررررررررررررررررررررراااااااااااااااااااااااائئئئئئئئععععععععععععععععععععععععععععععععععععععععععععععععع

[1aa1 0]

أستاذي عندي أكسل 2007 وبصراحة توقفت في شرحك عند هذه النقطة وإليك الصورة

http://files03.arb-up.com/i/00263/14x367b8kftj.jpg

ولم أجد كما في شرحك أذهب أو go وعندما أضغط على أيقونة انتقال في الأسفل لا يأتيني كلمة MasNoPass فماذا أصنع أستاذي

Edited September 20, 2010 by 1aa1