Password reset

[runningl33t]

NOTE: The intention of this post is not meant for the breaking of password protection.

I'm working on making an excel tool in which certain private information is hidden and password protected. As part of the functionallity of the tool, i'm attempting to have a reset macro in which all information is deleted. This includes the private password protected information and the password itself. The goal of this is so someone can send someone else the tool and that they'd be able to reset it to "default" without seeing any of the private information. The problem is the macro will have to somehow bypass and reset the password protection.

I already have a macro set up to protect the sheet:

Columns("A:B").EntireColumn.Select
        Selection.EntireColumn.Hidden = True
        x = InputBoxDK("Please enter password", "Password")
        Z = InputBoxDK("Reenter password", "Password confrimation")
        If (x) = (Z) Then
            Sheets("Possible Exit Date").Select
            ActiveSheet.Protect Password:=(x), DrawingObjects:=True, Contents:=True, Scenarios:=True
            y = ("0")
        Else
            MsgBox ("Confimation password not identical")

but the only way I know to use a macro to unprotect a sheet is

ActiveSheet.Unprotect

but this asks for a password. Is what I'm looking for possible/legal?

 

[Joe4]

As part of the functionallity of the tool, i'm attempting to have a reset macro in which all information is deleted. This includes the private password protected information and the password itself. The goal of this is so someone can send someone else the tool and that they'd be able to reset it to "default" without seeing any of the private information. The problem is the macro will have to somehow bypass and reset the password protection.

Please note that regardless of your intentions, we cannot help with any attempt to break, remove, or bypass any passwords. It is strictly forbidden by our rules. It doesn't matter what your intentions are (which we cannot verify anyhow), as someone else could use it for nefarious purposes.