>>>> الرد الثالث :
المشاركة الأصلية كتبت بواسطة kamy57 
مشكووووووور أخي ُEducation DZعلى المجهودات الجبارة التي استفدنا منها جميعافقط طلب إن أمكن أخي وهو رابط تنزيل برنامج فك التشفير في الاكسل ولو تكرمت كيفية استعماله علما أنني أملك office2003ولك جزيل الشكر مسبقا ونطلب من الله أن يضعها في ميزان حسناتك.وشكرا.
|
أشكر الصديق EducationDZ وسأجيب مكانه
Pour créer une macro à l'aide de Microsoft Visual Basic
- Dans le menu Outils de Microsoft Excel, pointez sur Macro, puis cliquez sur Visual Basic Editor.
- Dans le menu Insertion, cliquez sur Modules.
- Tapez ou copiez votre code dans la fenêtre de code du module.
- Pour exécuter la macro à partir de la fenêtre du module, appuyez sur F5.
- Lorsque vous avez fini d'écrire la macro, dans le menu Fichier, cliquez sur Fermer et retourner à Microsoft Excel.
ها هو الكود الذي تنسخه
الملف في المرفقات)
Sub enleve_protection()
Dim a, b, c, d, e, f, g, h, i, j, k, l As Integer
On Error Resume Next
For a = 65 To 66
For b = 65 To 66
For c = 65 To 66
For d = 65 To 66
For e = 65 To 66
For f = 65 To 66
For g = 65 To 66
For h = 65 To 66
For i = 65 To 66
For j = 65 To 66
For k = 65 To 66
For l = 32 To 126
ActiveSheet.Unprotect Chr(a) & Chr(b) & Chr(c) & Chr(d) & Chr(e) & Chr(f) & Chr(g) & Chr(h) & Chr(i) & Chr(j) & Chr(k) & Chr(l)
If ActiveSheet.Protect*******s = False Then
MsgBox "La protection a été enlevée - Un mot de passe satisfaisant est :" & Chr(a) & Chr(b) & Chr(c) & Chr(d) & Chr(e) & Chr(f) & Chr(g) & Chr(h) & Chr(i) & Chr(j) & Chr(k) & Chr(l)
Exit Sub
End If
Next
Next
Next
Next
Next
Next
Next
Next
Next
Next
Next
Next
End Sub
=========
>>>> الرد الرابع :
تحية اجلال و اكبار اخي على مشاركاتك الفعالة
و بعد
اخي كلما اردت ان اشفر خلية اجد ان الورقة كلها مشفرة
ما هو المشكل ؟
وبارك الله فيك مرة اخرى
=========
>>>> الرد الخامس :
المشاركة الأصلية كتبت بواسطة انيس1
تحية اجلال و اكبار اخي على مشاركاتك الفعالة
و بعد
اخي كلما اردت ان اشفر خلية اجد ان الورقة كلها مشفرة
ما هو المشكل ؟
وبارك الله فيك مرة اخرى |
اتبع الخطوات التالية وإن بقي الشرح مبهما لا تتردّد في السؤال مرّة ثانية وسأجيب إن شاء الله !
=========
وهذا شرح ثان بواسطة صور متحركة (إذا لم تتحرك الصور مرّر الفأرة عليها باستمرار !)
مهما قلت شكرا لاأوافيك حقك الأخ EducationDZ
وبودي أن أبق معك على انصال ان سمحت كما أشكر الأخ synaulux علي المساعدة.
الله الله الله الله الله الله الله
العفو.....................
يابارع ننتظر جدسدك
يعطيك الصحة أخي و بارك الله فيك , مساهمتك جاءت في وقتها....
المشاركة الأصلية كتبت بواسطة educationdz
اتبع الخطوات التالية وإن بقي الشرح مبهما لا تتردّد في السؤال مرّة ثانية وسأجيب إن شاء الله !
|
الله يعطيك الصحة و العافية
لقد اتبعت الخطوات و نجحت فعلا بفضل توجهاتك اخي الفاضل
الله ينور عليك و يزيدك من علمه و يجعل مساهماتك ذخرا يوم تلقاه
اللهم آمين.
بورك أخي الكريم
تشكر
بارك الله فيك
الله يعطيك حجة
تشفير وفك تشفير ورقة إكسل المرحلة الابتدائية
رد مع اقتباس
