اذهب الي المحتوي
أوفيسنا

فك حماية محرر الاكواد وحماية اوراق العمل


الردود الموصى بها

بسم الله الرحمن الرحيم

بسم الله و الحمدلله و الصلاة و السلام على اشرف خلق الله سيدنا محمد و على آله و صحبة و من والاه

أما بعد

نظرا لكثرة السؤال عن فك الحماية اما لمحرر الاكواد او لورق العمل

قمت بدمج الاكواد مع بعض التعديلات في ملف واحد للتسهيل على الاخوة

فقط كل ما عليك هو ان تقر ان الملف خاص بك ولا يعد تعديا علي ملفات الغير

يتم تفعيل الازرار الخاصة بكسر حماية محرر الاكواد واوراق العمل

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

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

اما كسر محرر الاكود ما عليك  الا ان تقوم باختيار الملف الهدف-xls- فتظهر لك رسالة خطأ بعدها يتم فتح محرر الاكواد

ومنها تقوم باعادة تعيين كلمة اخرى والحفظ

 

 

والسلام عليكم

 

Hack VBA.rar

  • Like 5
رابط هذا التعليق
شارك

استاذنا الكبير

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

شكرا ليك على هذا البرنامج الرائع

ياعالم الواحد مش عارف يقول اية انتم عالم مالكوش حل اية الحلاوة دى

فعلا انتم خير معين خير الناس

جزاك الله كل خير اخى الكريم ياسر العربى


 

  • Like 1
رابط هذا التعليق
شارك

33 دقائق مضت, أحمد الفلاحجى said:

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

وربنا ما يجعلنا ممن يتعلمون فيسيؤون العمل واجعلنا ممن يتعلمون فيحسنون العمل 

بالتوفيق اخى ياسر

مشكور اخي الكريم احمد الفلاحجي النشيط

علي مرورك الجميل

ورزقك وايانا العلم والعمل الصالح

6 دقائق مضت, حسام ميلكانا said:

استاذنا الكبير

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

شكرا ليك على هذا البرنامج الرائع

ياعالم الواحد مش عارف يقول اية انتم عالم مالكوش حل اية الحلاوة دى

فعلا انتم خير معين خير الناس

جزاك الله كل خير اخى الكريم ياسر العربى


 

اخي الكريم حسام ميلكانا

انا الذي لم يجد كلمات لشكرك علي هذه الكلمات الجميلة

بارك الله فيك اخي الغالي

تقبل خالص تحياتي

:fff::fff::fff:

رابط هذا التعليق
شارك

أخي الحبيب ياسر العربي

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

اسمح لي أن أرد .. وأنقد كعادتي

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

نقطة أخرى فيما يخص فك حماية أوراق العمل لم تعمل معي رغم أني تركت الملف فترة طويلة ليقوم بالأمر ، حتى مع تحويل الامتداد إلى Xls لم يعمل هذا الجزء

أرجو الإيضاح .. يا ورد يا فواح

 

  • Like 1
رابط هذا التعليق
شارك

حبيبي الغالي ابو البراء  رجع للعادة بتاعته تاني :wallbash:

ماشي ياريس موضوع فك محرر الاكواد للامتدادت الاخرى تحت البحث طبعا وانت عارف الموضوع دا ان لسه بنبحث فيه يبقي كدا وقع النقطة الاولي

النقطة التانية مجرب على معظم الامتدادات وفك الاوراق بدون مشاكل

اما عندك مش شغال مش عارف ليه انا هنزل نسخة مخصوص 64

عشان خطرك بس لما النت يظبط معايا هحملها

اتعب نفسك كدا وجربها على نسخة 32 كدا

وبعدين اللي عاوز يفك ملف  لو هخليه يحوله لمقطع صوتي هيحوله:wavetowel:

تقبل تحياتي

:fff:

وجاري ارفاق فيديو لطريقة عمل البرنامج

 

فيديو طريقة العمل

yasser vba.rar

  • Like 3
رابط هذا التعليق
شارك

أخي الحبيب ياسر العربي

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

وبصراحة ملفك عجبني وإن شاء الله يظبط معاك

أما بالنسبة لـ 32 بت ..فيبدو أنني قد هجرته تماماً ولم أعد أعمل عليه .. اللي خد ع الشغل العالي صعب يرجع تاني للشغل الضعيف

أنا بالفعل مرتاح جداً في نسخة الـ 64 بت ويندوز 10 وأوفيس 2013 نسخة 64 بت وتعمل بكفاءة عالية

تقبل تحياتي يا كبير

  • Like 2
رابط هذا التعليق
شارك

8 دقائق مضت, رجب جاويش said:

شكرا جزيلا للأستاذ المبدع / ياسر العربى

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

 

شكرا استاذ/ رجب جاويش

لمروركم الكريم هذا

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

تقبل فائق احترامي

 

رابط هذا التعليق
شارك

أخى الغالى المبدع والمبتكر دائما فى كل ما هو جديد ومفيد / ياسر العربى

سلمت يمينك وادام الله عليك الصحة والعافية

وزادك الله من العلم الكثير والكثير

تقبل تحياتى وتقديرى

  • Like 1
رابط هذا التعليق
شارك

السلام عليكم

أخي ياسر العربي شكرا لك وعمل ممتاز

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

باقي أن تسلخ جلده (إيجاد طريقة لكسر الحماية من الخارج )

ونحن علينا الباقي

 

تم تعديل بواسطه أبوعيد
  • Like 5
رابط هذا التعليق
شارك

11 ساعات مضت, م / ياسر فتحى البنا said:

أخى الغالى المبدع والمبتكر دائما فى كل ما هو جديد ومفيد / ياسر العربى

سلمت يمينك وادام الله عليك الصحة والعافية

وزادك الله من العلم الكثير والكثير

تقبل تحياتى وتقديرى

مشكور حبيبي الغالي الاسم الغالي ياسر 

لمرورك الكريم  حمدا لله على السلامة ايه الغيبة الطويلة دي لعله خير باذن الله

:fff::fff::fff::fff:

11 ساعات مضت, nasersaeed said:

سلمت يمينك وادام الله عليك الصحة والعافية

وزادك الله من العلم الكثير والكثير

تقبل تحياتى وتقديرى

 الملف المرفق امتداده  xlsm   كيف يفتح ملفات بامتداد  xls

اخي الغالي ناصر لك كل الشكر والتقدير لكلماتك الجميلة هذه

ولك بمثل ما دعوت

اما بخصوص طلبك لم افهمه جيدا يرجى توضيح المطلوب !

تقبل تحياتي

:fff::fff::fff::fff:

10 ساعات مضت, محمد علي الطيب said:

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

 

اخي الغالي محمد على الطيب 

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

ولك بمثل ما دعوت 

تقبل فائق احترامي

:fff::fff::fff::fff:

3 ساعات مضت, أبوعيد said:

السلام عليكم

أخي ياسر العربي شكرا لك وعمل ممتاز

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

باقي أن تسلخ جلده (إيجاد طريقة لكسر الحماية من الخارج )

ونحن علينا الباقي

 

اخي  الغالي أبو عيد 

كل الشكر و التقدير لشخصكم الكريم

ولمروركم  الجميل

وبالهنا والشفا (هنتف ريشة واسلخه واطبخه:wink2: )

تقبل تحياتي

:fff::fff::fff::fff:

  • Like 1
رابط هذا التعليق
شارك

المشرف الجميل  الغلاباااااااوى ملف جميل تسلم ايدك

بس ليه الهديه تفك المحمى .....  و هيه  محميه !!!

تحياتى و تقديرى

 

  • Like 1
رابط هذا التعليق
شارك

Sub PasswordBreaker()
' ßæÏ Ýß ÍãÇíå ÇáæÑÞå
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)
ActiveWorkbook.Sheets(1).Select
Range("a1").FormulaR1C1 = 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

اخى ياسر مشكورا

على البرنامج الجميل ده

ولكن كما قال استاذنا ياسر الاهم

هو فك حماية vba

للامتدادات الاخرى

لانك ببساطه لو فكيت حماية vba

لاى ملف

يمكنك ساعتها استخدام الكود الاتى

لفك حماية اوراق العمل

 

 

 

 

 

رابط هذا التعليق
شارك

منذ ساعه, مختار حسين محمود said:

المشرف الجميل  الغلاباااااااوى ملف جميل تسلم ايدك

بس ليه الهديه تفك المحمى .....  و هيه  محميه !!!

تحياتى و تقديرى

 

حبيبي واستاذي مختار  شكرا لمرورك الكريم

وبعدين انا عاملها خدمه ليكم عشان لسه هدورو على مثال لا جربو في الملف :wink2:

اكيد  الكل عملها :blink:

تقبل تحياتي

ومتنساش انا شيلت الخروف وشيلت  الجمل كمان :power:

 

56 دقائق مضت, إبراهيم ابوليله said:

اخى ياسر مشكورا

على البرنامج الجميل ده

ولكن كما قال استاذنا ياسر الاهم

هو فك حماية vba

للامتدادات الاخرى

لانك ببساطه لو فكيت حماية vba

لاى ملف

يمكنك ساعتها استخدام الكود الاتى

لفك حماية اوراق العمل

حبيبي واخي ابراهيم الملف يفك كل الامتدادات لورق  العمل عادي وكل الاوراق دفعه واحده  عادي

وقلتها لابو البراء الغالي وهقولها تاني 

تم فك حماية معظم الامتدادت الاخرى لمحرر الاكواد

:wavetowel:

وجاري التأكد من طريقة العمل ونبقي نعمل لها موضوع

مشكور حبيبي لمرورك الكريم

 

رابط هذا التعليق
شارك

ماشى ياعم ياسر

خلينا معاك للاخر

بس بالله عليك اهم حاجه

خلى بالك من الامتدادات

xlsm---xlsb

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

ليه بقى

علشان انت عارف ان الملف مش بيفك xlsm

والا مكنتش رفعت الملف بالامتداد ده ياريس

على العموم فى طلب تانى ياكبير

.........................................

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

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

يابقى ورينا الهمه يابوب

تقبل تحياتى

 

  • Like 1
رابط هذا التعليق
شارك

تحديد ا الامتدادين اللي ذكرتهم تم فكهم  وان شاء الله نحط شرح للطريقة

اما بقي موضوع الاشمل دا وعاوزين تفك من برا بقي يابوب دي تعجيز هههههههه هحاول  وبحاول بس موعدكشي بحل نهائي اهم حاجه جرب فك اوراق العمل باي امتداد بالبرنامج الموجود وقولي النتيجة معاك تمام ولا لا

  1. وبعدين ناصح ليه حول الملف وفك خلصت الحكاية
رابط هذا التعليق
شارك

شكرا المهندس ياسر العربي هو ليه اللي اسمهم ياسر دايما مبدعين ايه بالضبط الحكاية

ممكن تخبروني السر ايه ...

جزاك الله عنا كل الخيرات وامطرك بوافر البركات الابدية

 

  • Like 1
رابط هذا التعليق
شارك

الــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــله عليك

مبدع حتى في اسمك ابدعت فأمتعت "يا   سر" قد حللت الاشكال يا سيد الابطال

الحمد لله والله يعطيك اكثر مما تسأله بعونه

  • Like 2
رابط هذا التعليق
شارك

الأستاذ الفاضل المبدع العبقرى

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

أولاً   أحب أن أعبر لك عن مدى إعجابى الشديد بهذا الملف الذى اقف عليه بانبهار شديد  وأدعو الله تعالى أن يمن عليك بمزيد من العلم الذى تنشر به الفائدة دائمًا على المبتدئين أمثالى

والذى أعتبر نفسى مهما وصلت بالدرجة فى عالم الاكسيل لا أساوى نقطة ماء فى بحر علمكم الخضم ..

ثانيًا : اسمح لى أن أن أقدم لسيادتكم عتابـــا صغيرًا  كعتاب المحبين وأتمنى أن أكون من المحبين  ، وهو بهذا الملف الخارق سيتم لأى شخص كسر حماية أى ملف لشخص آخر قد بذل فيه من الجهد ما

بذل وسهر الليالى الطوال على أن يخرج عمل ما ، ويأتى شخص ما بهذا الملف المبدع ويخترقــه  والذى أصبح بعد اختراقه عديم الفائدة  ( لاستغلال ما فيه من الأكواد والصيغ والمعادلات )

مما قد يسبب بعض الاحباط لصاحبه .

وأعتذر لكم إذا كان عتابى هذا ليس بالواجب فى محله . 

وتقبل تحياتى التى تعجز الكلمات عن وصفها

رابط هذا التعليق
شارك

2 ساعات مضت, قلم-الاكسل(عبدالعزيز) said:

شكرا المهندس ياسر العربي هو ليه اللي اسمهم ياسر دايما مبدعين ايه بالضبط الحكاية

ممكن تخبروني السر ايه ...

جزاك الله عنا كل الخيرات وامطرك بوافر البركات الابدية

 

اخي عبد العزيز كل الشكر والتقدير لشخصكم الكريم

السر قالو ليك حبيبي ابو البراء 

انا لو فايق كنت فتيت لك في موضوع السر دا اصلي بحب الرغي :wink2:

2 ساعات مضت, ياسر خليل أبو البراء said:

أخي الحبيب عبد العزيز

السر في الاسم (يا   سر ...)

تقبل وافر تقديري واحترامي

فهمهالي بس ع جمب كدا :blink:

37 دقائق مضت, nasersaeed said:

عندي اوفيس 2003 ولا يفتح ملفك عندي
... لماذا       ؟

مرفق نسخة متوافقه مع 2003 Hack VBA.rar

19 دقائق مضت, الأستاذ / محمد الدسوقى said:

الأستاذ الفاضل المبدع العبقرى

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

أولاً   أحب أن أعبر لك عن مدى إعجابى الشديد بهذا الملف الذى اقف عليه بانبهار شديد  وأدعو الله تعالى أن يمن عليك بمزيد من العلم الذى تنشر به الفائدة دائمًا على المبتدئين أمثالى

والذى أعتبر نفسى مهما وصلت بالدرجة فى عالم الاكسيل لا أساوى نقطة ماء فى بحر علمكم الخضم ..

ثانيًا : اسمح لى أن أن أقدم لسيادتكم عتابـــا صغيرًا  كعتاب المحبين وأتمنى أن أكون من المحبين  ، وهو بهذا الملف الخارق سيتم لأى شخص كسر حماية أى ملف لشخص آخر قد بذل فيه من الجهد ما

بذل وسهر الليالى الطوال على أن يخرج عمل ما ، ويأتى شخص ما بهذا الملف المبدع ويخترقــه  والذى أصبح بعد اختراقه عديم الفائدة  ( لاستغلال ما فيه من الأكواد والصيغ والمعادلات )

مما قد يسبب بعض الاحباط لصاحبه .

وأعتذر لكم إذا كان عتابى هذا ليس بالواجب فى محله . 

وتقبل تحياتى التى تعجز الكلمات عن وصفها

اخي الغالي ا/محمد الدسوقي

شكرا على كلماتك الجميلة وهذه اراها مبالغة وانت تقدر تعدينا كمان بس يكون في عزيمة ولما يكون عندك عزيمةابقى اعزمني :wavetowel:

معلش بحب الرخامة شوية  تقبل فائق احترامي

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

ولان حماية الاكسيل ضعيفه ظهر تحويل الملف لملف تنفيذي لحماية افضل

فبردو ظهر الرخم ياسر اللي هو انا وقالهم الملفات التنفيذية تعبانه

وياريت تتابع الموضوع الاتي لتعرف اكتر

http://www.officena.net/ib/topic/65613-قاهر-الملفات-التنفيذية-واستخراج-الملف-الاصلي/

ولما احبط الناس قلت لازم نخدمهم

فعملت كدا

http://www.officena.net/ib/topic/65615-أفضل-حماية-للاكسيل-تفوق-التحويل-الى-ملفات-تنفيذية-100مرة/

وبعدين كدا

http://www.officena.net/ib/topic/65946-اختبار-مدى-حماية-الملف-التنفيذي-للفيجوال6-مع-الاكسيل/

وياريت اكون وفيت الشرح

وعتابك فوق راسنا وانت اكيد من الاحباب والاخوة الافاضل

ولكن ستفهمني بعد قراءةموضوع قاهر الملفات

تقبل تحياتي

  • Like 1
رابط هذا التعليق
شارك

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information