Sunday, July 28, 2013

Password না জেনেই Password Protect করা Excel Sheet এর Password ভেঙ্গে Unprotect করে ফেলুন সহজেই (MS Excel 07)

হতে পারে আপনারই কোন Excel Sheet এর Password আপনি ভুলে গেছেন, এখন Unprotected করতে পারছেন না। অথবা অন্য কারো Excel Sheet এ আপনার কাজ করা জরুরী হয়ে পড়েছে (:P) কিন্তু ওই Sheet টা protect করা। আজ জেনে নিন কিভাবে খুব সহজেই Password না জেনেই Protect করা Excel Sheet কে Unprotected করে আরামসে কাজ করবেন। 

প্রথমে Excel এ Developer মেনু আনতে হবে। Developer মেনু আনার জন্য Excel Sheet এর একদম উপরের বাম কোনার Office Button এ ক্লিক করুন। নিচের ছবিতে Office Button দেখানো হল-


Office Button এ ক্লিক করার পর যে বক্স খুলবে সে বক্স এর নিচের দিক থেকে Excel Options এ ক্লিক করুন। Excel Options নামে একটি উইন্ডো খুলবে। ওই উইন্ডোর বাম পাশ থেকে Popular এ ক্লিক করুন। এবার ডান পাশ থেকে Show Developer tab in the Ribbon এর বাম পাশের Check Box এ ক্লিক করে টিক মার্ক দিয়ে দিন। বিষয়টি নিচের ছবির মত হবে-

   
Ok করে বেরিয়ে আসুন। দেখুন আপনার Excel Sheet এ এখন Developer নামে একটি নতুন মেনু যোগ হয়েছে। এই কাজটি একবার করলেই আপনার সকল Excel Sheet এ এই Developer মেনু Show করবে। নিচের ছবিতে Developer মেনু দেখুন -


এবার আসল কাজ। এখন Password Protected এক্সেল ফাইল এর একটু আগে যোগ করা Developer মেনু তে ক্লিক করে একদম বাম পাশের Visual Basic এ ক্লিক করুন। নিচের ছবিতে দেখানো হল-


Microsoft Visual Basic নামে একটি নতুন উইন্ডো খুলবে। এখন বাম পাশ থেকে যে Sheet এ ফাইল টি আছে (সাধারনত Sheet 1) সেটাতে ডাবল ক্লিক করুন। এখন ডান পাশে Code লিখার একটি বক্স খুলবে। ওই বক্স এ নিচের code টা Copy করে Paste করুন। 

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

বিষয়টি নিচের ছবির মত হবে-


এখন Key-Board থেকে f5 চাপুন। ছোট একটা বক্স আসবে। ওই বক্স এর OK তে ক্লিক করুন। Microsoft Visual Basic উইন্ডো টি Close করে দিন। কাজ শেষ। এখন দেখুন আপনার Password Protected Excel Sheet টি Unprotected হয়ে গেছে। 

-----------------------------------------------------

নিচের পোস্টগুলোও আপনি পছন্দ করতে পারেন -




 

Post Comment

No comments:

Post a Comment