+ Post New Thread
Results 1 to 4 of 4
Office Software Thread, XLS Protected Sheets in Technical; Hi there, I have an old XLS spreadsheet, the workbook itself is not protected, you can open it up and ...
  1. #1

    Join Date
    Jul 2010
    Location
    Scotland
    Posts
    11
    Thank Post
    13
    Thanked 0 Times in 0 Posts
    Rep Power
    0

    XLS Protected Sheets

    Hi there, I have an old XLS spreadsheet, the workbook itself is not protected, you can open it up and view the data, but the individual sheets are protected. That means I cant view the formulas. I have stumbled across various software that claims to remove excel passwords but they old seam to apply to protected workbooks NOT sheets.
    Does anyone know of a way to remove this protection without knowing the password?

    JK

  2. #2


    Join Date
    Feb 2007
    Location
    51.403651, -0.515458
    Posts
    9,793
    Thank Post
    262
    Thanked 2,964 Times in 2,179 Posts
    Rep Power
    846
    Whenever I need to do this, I use a free Excel add-in called Password.xla. This can unprotect both workbooks and sheets.

  3. Thanks to Arthur from:

    leco (12th August 2010)

  4. #3
    leco's Avatar
    Join Date
    Nov 2006
    Location
    West Yorkshire
    Posts
    2,026
    Thank Post
    595
    Thanked 125 Times in 119 Posts
    Rep Power
    42
    Thanks for the link Arthur, could come in very handy.

  5. #4
    amvc's Avatar
    Join Date
    Oct 2007
    Posts
    136
    Thank Post
    39
    Thanked 14 Times in 12 Posts
    Rep Power
    19

    passcrack macro

    I use this code that i found years ago, helps alot with all those students that instantly forget thier paaswords

    Add it to vba in the workbook and run (at your own risk obviously =p )
    Code:
    Sub PassCrack() 'Breaks worksheet password protection.
        
        Dim i, j, k, l, m, n, i1, i2, i3, i4, i5, 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 "Your sheet is now unprotected, please " & _
            "remember to reprotect with a more MEMORABLE " & _
            "password", vbOKOnly, "Password removed"
            Exit Sub
        End If
        
        Next: Next: Next: Next: Next: Next: Next: Next: Next: Next: Next: Next
    End Sub

    Jon
    Last edited by amvc; 12th August 2010 at 10:43 AM. Reason: instructions added

  6. Thanks to amvc from:

    JKsysAdmin (12th August 2010)



SHARE:
+ Post New Thread

Similar Threads

  1. how do you convert an xml file to xls
    By speckytecky in forum How do you do....it?
    Replies: 6
    Last Post: 15th June 2009, 11:09 AM
  2. [MS Office - 2003] xx.xls locked for editing
    By Little-Miss in forum Office Software
    Replies: 4
    Last Post: 22nd April 2009, 11:51 AM
  3. cheat sheets
    By russdev in forum Web Development
    Replies: 0
    Last Post: 18th February 2008, 03:38 PM
  4. XLS to CSV not working for pupil info
    By MK-2 in forum ICT KS3 SATS Tests
    Replies: 3
    Last Post: 24th January 2007, 02:30 PM
  5. sonic.xls
    By timbo343 in forum Windows
    Replies: 4
    Last Post: 12th October 2006, 09:52 AM

Thread Information

Users Browsing this Thread

There are currently 1 users browsing this thread. (0 members and 1 guests)

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •