Remove A Password
Feb 2, 2010I have givien a password to a workbook through the save as meathod. How do I remove this password so anybody can just select the workbook to open it?
View 2 RepliesI have givien a password to a workbook through the save as meathod. How do I remove this password so anybody can just select the workbook to open it?
View 2 RepliesWe had an Excel worksheet that is used everyday suddenly pop up with protection. I have used protection before, but this one never had a password. We put in every known password we use, but none worked. I resigned to re-typing the worksheet, then, in between Friday night, and Saturday noon, when most of the office is out, a different Excel worksheet has the same problem. We are using Excel 97.
View 3 Replies View RelatedI am trying to change a password on a workbook. I have already gone to encrypt document and changed the password. However, when I open the workbook again, my new password works but another popup shows and asks me for another password for write access. That second password was my original password, and I don't know how to change that.
View 1 Replies View RelatedI Need To Remove Password From All .xls Files ( More That 2000 Files )
From A Directory And It's Sub Directory, All With Same Password.
I have a spreadsheet that cannot be modified. How do I remove the existing password? (I don't have the existing password).
View 1 Replies View RelatedI have many spreadsheets in Excel 2007 that are password protected to open. How can I remove this function???
View 5 Replies View RelatedIn my office, our colleague locked his macros before he left. Now, I would like to continue in that but I have no idea, how to get into macro - to study it and change it as needed now.
How to open it?
locked one.xlsm
I have created a worksheet and password protected, I know the password but now want to send to someone and remove the password protection option instead of them having to use a password to open it.
View 5 Replies View RelatedWhen opening a new Excel file, it is asking me for a password to an old excel file that was password protected, which I have deleted from my computer. It is still asking for this password every time I open a new or existing file. When I hit cancel it lets me open the file.
View 11 Replies View RelatedI have a spreadsheet, which has certain worksheets that are password protected. I need to make changes to some of the formulas, and the VBA modules, however I cannot remember the password!! Is there a way of identifying the password??
View 3 Replies View RelatedI am havng problems with the belwo macro code -
Range("G7").Select
Selection.Copy
Workbooks.Open Filename:= _
"Q:PublicPAYMENTS Q&RREPORTSSuspense Activity BUSINESS2008 - Suspense BUSINESS - Activity Reports2008 Avon.xls"
Application.CutCopyMode = False
ActiveWorkbook.Save
ActiveWindow.Close
End Sub
When i open the workbook it requires me to insert a password, i tried to type this but excel will not follow keystrokes, i then inserted the password in cell G7 which i then copy and paste, which you can see the copy at the beginning of the macro.
Is there a way where you can get it to insert the password so i can open the workbook in a macro.
What im trying to do is save 26 suspense spreadsheets by just clicking on a macro.
I have a sheet that is password protected. I have this code attached to a command button. It will unlock the worksheet, autofilter it, print it, unfilter it, and password protect the sheet again. However it is protecting it without a password. I need to have it protected with the password so that someone will not be able to just go to tools to unprotect the sheet.
Private Sub CommandButton1_Click()
ActiveSheet.Unprotect "rainforest"
Columns("O:O").Select
Selection.AutoFilter
Selection.AutoFilter Field:=1, Criteria1:=">0", Operator:=xlAnd
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
Selection.AutoFilter Field:=1
Selection.AutoFilter
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True _
, AllowSorting:=True, AllowFiltering:=True
End Sub
I have found a very useful UDF for removing non-alpha characters from strings. (See below, Credit for posting to Stanley D Grom - Ozgrid post ´Removing Non-alpha Characters From Text´).
Option Explicit
Private Function RemoveCharacters(InString As String) As String
Dim intLoopCounter As Integer
Dim intStringLength As Integer
Dim intASCIIVal As Integer
intStringLength = Len(InString)
InString = LCase(InString)
For intLoopCounter = 1 To intStringLength
intASCIIVal = Asc(Mid(InString, intLoopCounter, 1))
If intASCIIVal >= 97 And intASCIIVal <= 122 Then
RemoveCharacters = RemoveCharacters + Mid(InString, intLoopCounter, 1)
End If
Next intLoopCounter
End Function
Two requests:
1. Could the UDF be modified such that any part of a string contained within brackets is also removed (e.g. "NLGA High Street (West-Enfield), EN6" becomes "nlgahighstreeten")?
2. Can an argument be added to the format of the UDF, such that numbers (0 to 9) are either included or excluded (e.g. RemoveCharacters(A1,1) where the argument ´1´ would include any numbers (0 to 9), so "NLGA2003 High Street (West-Enfield), EN6" becomes "nlga2003highstreeten6")? ´blank´or ´0´would exclude these numbers, i.e. would return "nlgahighstreeten"
how to set password for VBAProject?
i know to protect the spreadsheet
i want to password protect my coding in the VBA Project module ...
When using the a file with VBA based on a button is there any way to add a password to that file at the same time?
That way it can be opened by anyone?
The code below works fine but the user can open the file in fact anyone can once they press the command button I want to add a password so when the file is reopened it requires a password?
Is this some thing vba even does?
Private Sub CommandButton1_Click()
Const PTHNAME As String = "C:Feedback"
Dim FileNameWithDate As String, x As Integer
FileNameWithDate = Format(Date, "yyyymmdd")
x = 1
If Dir(PTHNAME & FileNameWithDate & ".xls") = "" Then
ActiveWorkbook.SaveAs Filename:=PTHNAME & FileNameWithDate & ".xls"
Else
Do Until Dir(PTHNAME & FileNameWithDate & x & ".xls") = ""
x = x + 1
Loop
ActiveWorkbook.SaveAs Filename:=PTHNAME & FileNameWithDate & x & ".xls"
End If
SendMailtoBDTT
SendMailtoPerson
End Sub
First, I know passwords are easy to break. The point is only to keep the average Excel user in a dept of 3 from accidentally damaging the data.
Normally I hardcode passwords to view xlveryhidden sheets.
But this workbook is for a dept head who has standard password(s) he uses to open or edit a file. I would like to capture these passwords and make it the same password(s) to view a hidden sheet.
This way if he ever changes the password to open/edit it will automatically change the password to view the hidden sheet(s).
How to set a password before executing any action.
For example, I have "cancel" button in my userform. If i click "cancel" it unloads the form. Instead of that i need a password prompt. so when i click the "cancel" button ,it should ask for a password. only if i provide the correct password then only the form should be unloaded.
when i run this marco, i get a Password msgs box appear, now is there away of running it so that it does not ask for a password, I have tried to unprotect the sheet with a password which works, but it never re-protected it self,
I don't know that much about VBA and my programming knowledge is very limited. I dont want the code re-written, as its someone elses work and it does what i want, i just need to know if an extra line can be entered to stop the password msg box. I.E. it needs to run without asking for the password
I have a 3 2 user forms, plus a calandar pop-up user form. One is a Log In Screen with a user id combo box and a password textbox referenced to ranges in a very-hidden sheet.
My second form is a spend tracker with mulitple fileds, text boxes, combo boxes, etc.
One of the fields in the spend tracker is user name, what I would like to do is when a user enters their user name and password the entered user name as long as it matches one in the database be populated in the user name field and not allow it to be edited. Is there a way to do this, if so, what is the code and where do I put it.
I will attach my file so you can check it out. Log in: tester
Password: test01
Programmers Access Code is 1234.
I was working on a workbook that unhides certain sheets depending on who's logged in. It seems to work fine. However, after it's run (and sheet2 has been unhidden), when I go to unprotect the workbook, the password ("test") no longer works.
View 5 Replies View RelatedI have an excel spreadsheet that has password to open it as well a read only prompt. What I would like to happen is after the user has typed in the password, clicked ok, and then clicked either "yes" or "no" for read only or not that a specific named macro immediately is run.
View 4 Replies View RelatedI have a workbook where each tab represents a 'base.' You can select which base to view by selecting an option from a drop down box on a menu page.
The data for each base is of a confidential nature so I would like to password protect each tab so that it asks for a password BEFORE the page opens. I don't think Excel has the functionality to do this unless I make the pages 'Very Hidden'?
I have a excel document with 5 tabs (sheets) and, because different people work with a different tab (sheet), I want to lock each tab (sheet). I want the tab to be visible on the tab bar but when you click on it you will not be able to see the content of that tab (sheet) until you provide the right password (each tab with a different pasword).
View 2 Replies View Relatedhow do i put the password of a file into a macro ?
View 4 Replies View RelatedI have a worksheet that is password protected. The userforms used to input all the data have an initialize event that unprotects the sheet to input the data and then before protect the sheet upon closing the userform. This works perfect so that input data cannot be changed once entered; however, the problem I have is that I need to allow autofiltering so users can sort through their input data. I have a command button that unprotects the sheet and places the autofilters in the correct locations, but once this is activated the worksheet then is open for modifications by the users. Is there a way that I can allow autofiltering while still keeping the data protected? If .
View 9 Replies View RelatedI use the following piece of code to show/hide certain worksheets in a workbook. To access the hidden sheets, a command button runs the code. It works very well, except that the password is openly displayed in the message box (as opposed to returning asterisks for the typed characters).
Sub togglesheets()
Dim Ws As Worksheet
Dim strPassword As String
strPassword = InputBox("Enter Password")
If strPassword "Password" Then MsgBox "Wrong Password": Exit Sub
Application.ScreenUpdating = False
For Each Ws In ActiveWorkbook.Worksheets
If Ws.Name = "Apr-Sep" And Ws.Visible = xlSheetVisible Then
Ws.Visible = xlSheetVeryHidden
ElseIf Ws.Name = "Apr-Sep" And Ws.Visible = xlSheetVeryHidden Then
Ws.Visible = xlSheetVisible
End If..............
I'm trying to use the Tools|VBA Project Properties dialog box to stop folks from unhiding an xlveryhidden sheet, but even though I check the "lock" checkbox and input passwords in the password and the password verify boxes, Visual Basic fails to stop me from selecting the sheet in question from an Alt-F11 spawned VBA, and editing away.
View 9 Replies View Relatedis it possible to password protect a tab (worksheet) within a multiple worksheet file.
View 9 Replies View RelatedHowever, one problem in particular has gotten me stumped after a few days of working on it and I was hoping someone might be able to help me understand how to crack it. The question is from chapter 7, question 12(a).
"All passwords in your company's system must be 8 characters long, must start with an uppercase letter, and must consist only of uppercase and digits -- no spaces.
Write a sub to get a user's new password. It should use an input box, embedded within a Do loo, to get the password. The purpose of the loop is to check that a valid password has been entered."
Below is my latest try. It will technically work for a password of 4 characters instead of 8, but it already runs pretty slow and I have a feeling that there must be a better way to do this.
Sub Password()
Dim i As Integer, j As Integer, k As Integer, l As Integer
Dim pw As String 'pw is the password
Dim Length As Integer
'48-57 = 0 To 9, 65-90 = A To Z, 97-122 = a To z
Do Until isValid = True
pw = InputBox("Please enter a valid password.", "Password")
Length = Len(pw)
For i = 65 To 90
For j = 48 To 90
For k = 48 To 90
For l = 48 To 90
If pw = (Chr(i) & Chr(j) & Chr(k) & Chr(l)) And Length = 4 Then
isValid = True
Exit For: Exit For: Exit For: Exit For
End If
Next: Next: Next: Next
Loop
End Sub
I got this code from this board and it works OK for generating 1 password. What I want to do is to generate X amount of passwords on to sheet2, so if I use cell B1 as the amount of passwords required it will generate that amount on sheet 2. I tried doing a loop, but had no luck with it, (Not ruling out user error at this end)
Sub PasswordGenerator()
Dim Password As String
Dim PasswordLength As Byte
Dim LC As Byte 'Loop Counter
Dim strRndmChr As String
Dim LAC As Byte 'Lowest Ascii Character
Dim HAC As Byte 'Highest Ascii Character
Dim UseSymbolics As Boolean
Dim HasSymbolics As Boolean
Dim RandomNumber As Byte
'Set parameters.
PasswordLength = 14...........