• Hi All

    Please note that at the Chandoo.org Forums there is Zero Tolerance to Spam

    Post Spam and you Will Be Deleted as a User

    Hui...

  • When starting a new post, to receive a quicker and more targeted answer, Please include a sample file in the initial post.

How to unprotect the sheet if we do not know the password

ThrottleWorks

ThrottleWorks

Excel Ninja
Hi,


I have a file, this file has around 12 tabs.

All the tabs are pasword protected.


There are 100s of formulas used in the file.


I want to copy these formulas (by doing F2 in the cell).


But all the sheets are password protected & I do not know the password.


Is there any way, so that I can copy the cells by using F2.

I do not want to copy the values, I want to copy the formulas.


Writing all the formulas will be very cumbersome.


Hope I am not offending forum rules by posting this question, apology in advance.


Can anyonce please help me in this.
 
I won't post it here, but if you do a google search for "Sub PasswordBreaker()" I'm sure you will find what you are looking for
 
Hi, sachinbizboy!


Should this help you?

http://www.familycomputerclub.com/how-to-open-password-protected-excel-worksheet-lost-password.html


If not you could try this:

a) download this sample file:

https://dl.dropboxusercontent.com/u/60558749/How%20to%20unprotect%20the%20sheet%20if%20we%20do%20not%20know%20the%20password%20%28for%20sachinbizboy%20at%20chandoo.org%29.xlsm

b) open a new instance of Excel and load the previous file

c) in the same instance create a new workbook, go to the VBE editor (Alt-F11), insert a new module (Insert, Module), and copy and paste the following code into it

-----

[pre]
Code: 
Option Explicit

Sub DuplicateProtectedCells()
' constants
Const ksWS = "Hoja1"
Const ksRange = "A1:B1"
' declarations
Dim I As Long, J As Long
' start
' process
With Workbooks(1).Worksheets(ksWS).Range(ksRange)
For I = 1 To .Rows.Count
For J = 1 To .Columns.Count
ActiveWorkbook.Worksheets(ksWS).Cells(I + .Row - 1, J + .Column - 1).Formula = .Cells(I, J).Formula
Next J
Next I
End With
' end process
End Sub
[/pre]
-----

d) rename the worksheets in new book from "SheetX" to "HojaX", with X={1,2,3} (due to my Excel version language

e) run the macro


In the source workbook, worksheet "Hoja1" is visible, worksheet "Hoja2" is hidden, and worksheet "Hoja3" is very hidden. It works for the three conditions, you can try it changing the value of constant ksWS in the macro.


Just advise if any issue.


Regards!
 
SirJB7, thanks a lot for the help.


I could check the 1st solution in the office, it is amazing.

I will do it at home, Gmail not allowed in office.


Sir, I am not allowed to access the second link in the ofice.

I will download it at home & will work on it.


I am not able to understand the code, but it looks very interesting.

Thanks a lot for the help & your time.


Take care, have a nice day.
 
Hi sachinbizboy,


You may also find the video in this post somewhat helpful.


http://chandoo.org/forums/topic/protection-tab-of-the-format-cells-dialog-box-is-not-appearing#post-31763


Faseeh
 
Hi Faseeh, thanks a lot for the help.

I am not allowed to check You Tube in the office.


Will do at home, thanks a lot, have a nice day.
 
Hi sachinbizboy,


Try this one, I've used it in the past and it works fine


http://www.theofficeexperts.com/VBASamples/Excel02.htm
 
I've got this saved into my Personal.xls workbook. =)

www.mcgimpsey.com/excel/removepwords.html
 
@ oldchippy, thanks a lot, have a nice weekend.


@ Luke Sir, thanks a lot, have a nice weekend, the page is now in my fav.


Thanks a lot everyone.
 
You must log in or register to reply here.
Back
Top