If ActiveSheet.ProtectContents = False Then If (objProject Is Nothing) Then Project_IsProtected = Trueīreaking Worksheet Protection Sub PasswordBreaker2()ĭim i As Integer, j As Integer, k As Integerĭim l As Integer, m As Integer, n As Integerĭim i1 As Integer, i2 As Integer, i3 As Integerĭim i4 As Integer, i5 As Integer, i6 As Integerįor i = 65 To 66: For j = 65 To 66: For k = 65 To 66įor l = 65 To 66: For m = 65 To 66: For i1 = 65 To 66įor i2 = 65 To 66: For i3 = 65 To 66: For i4 = 65 To 66įor i5 = 65 To 66: For i6 = 65 To 66: For n = 32 To 126ĪctiveSheet.Unprotect Chr(i) & Chr(j) & Chr(k) & _Ĭhr(l) & Chr(m) & Chr(i1) & Chr(i2) & Chr(i3) & _ Is the Project Protected Public Function Project_IsProtected() As Boolean If the name of your project has been changed the menu option will not be (Tools > VBAProject Properties) but will be the new name of the project. You can change the name of your project to something else, although not many people do this. The default name used for every VBA project is "VBAProject" You cannot apply a locked this project password if there is no VBA code and the file extension is.
The name might vary depending whether you have renamed the project You can protect your code by locking the project for viewing and providing a password (Tools > VBAProject Properties)(Protection tab, "Lock project for viewing"). You can protect your VBA projects with passwords although your code is not 100% secure.Īdding a password will deter the average user though.
0 kommentar(er)
