تبلیغات
The life - کدِ ، شکستن رمز مربوط به یک شیت در اکسل
 
The life

ممکن است برخی از شیت های فایل اکسل شما دارای رمز  باشند و شما نتوانید تغییراتی را بروی آنها اعمال کنید ، در این مطلب به شما آموزش داده می شود که چگونه رمز شیت های اکسل را شکسته و آنها را ویرایش نمائید برای این کار مطابق مراحل زیر عمل کنید :

1 - ابتدا وارد فایل اکسلی می شویم  که دارای رمز است

2 - در شیت ی که دارای رمز است ، ALT+F11 را می زنیم ( با این کار ، محیط visual basic اکسل باز می شود  ) 

3 - با وارد شدن به محیط  visual basic اکسل ، در قسمت سمت چپ آن ، تمامی شیت های فایل اکسل شما دیده می شود ، بروی شیت مورد نظرتان که دارای رمز می باشد دابل کلیک کرده و در پنجره ای که باز می شود کد ماکرو زیر را کپی کنید

Sub PasswordBreaker()

'    Breaks worksheet password protection.

    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 - پس از کپی کردن کد ، پنجره مربوط  به کد را ببندید ( نیازی به ذخیره کردن نیست )

5 در آخر کافی ست بروی علامت اجرای ماکرو ( Run Macro )  کلیک کنید


پس از انجام مراحل بالا ، رمز مربوط به شیت ی که کد را بروی آن اجرا کرده اید ، از بین می رود و شما می توانید تغییرات مورد نظر خود را بروی فایل اکسل انجام دهید





نوع مطلب : آموزش اکسل Excel، 
برچسب ها : آموزش اکسل، شکستن رمز شیت اکسل، unlock pass excel file،
لینک های مرتبط :
یکشنبه 1394/09/1 18:51
با سلام مطالب تون جالبه به وبلاگ منم سر بزنید با تشکر گلی وبلاگ منابع طبیعی
Mohammad Hسلام - ممنون از نظرتون و اینکه سر زدید - حتما سر می زنم
 
لبخندناراحتچشمک
نیشخندبغلسوال
قلبخجالتزبان
ماچتعجبعصبانی
عینکشیطانگریه
خندهقهقههخداحافظ
سبزقهرهورا
دستگلتفکر
نظرات پس از تایید نشان داده خواهند شد.


آمار وبلاگ
  • کل بازدید :
  • بازدید امروز :
  • بازدید دیروز :
  • بازدید این ماه :
  • بازدید ماه قبل :
  • تعداد نویسندگان :
  • تعداد کل پست ها :
  • آخرین بازدید :
  • آخرین بروز رسانی :
تماس با ما
اللهم عجل لولیک الفرج
کسی نیامده جز او سر قرار خودش نشسته غرق تماشای شیعیان خودش چه انتظار عجیبی ست اینکه شب تا صبح کسی قنوت بگیرید به انتظار خودش