I 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 1 workbook with 11 worksheets.
Is there a way users can be prompted for a password when a tab is clicked? if wrong or no password is entered, then show sheet 1 only.
1 main sheet, and 10 sub sheets. Any of the 10 tabs that get clicked need to be prompted for a password, each different.
I'm new to the message board so I'm not sure if this question has been addressed. I am creating an excel workbook that two groups need to provide data for, but I do not want the two groups to see each other's tab for inputing data. I know how to protect a sheet in the workbook, but a viewer can still see the contents on the sheet. Is there a way to show the tabs, but when you click on them, it automatically asks for a password before the tab contents can be viewed.
View 9 Replies View RelatedI have one workbook with different Tabs that are tied to a master sheet. Different offices are respondable for entering their office information I was hoping instead of seperating the tabs into different workbooks and linking to the master, I could password protect each office tab. Can this be done?
I have a spreadsheet with a number of different tabs. I need to be able to set a password for these tabs so nobody can access the other ones except with a password. It needs to be an easy way to do it as senior managers are going to be using the spreedsheet and they wil only want to enter a password to have the sheet appear in front of them!!
I have seen a thread posted before about a macro that can be used to set password for each tab. The trouble is I have no idea how to get it to work !! Can any body help me as my VB knowledge is extremely limited!!
I have been trying to get Excel (2007) to change the colour of tabs to match other tabs in the workbook
Using this code I get the colour code of the current tab
Code:
x = ActiveSheet.Tab.ColorIndex
But when I use this value in a procedure like this:
Code:
ActiveSheet.Tab.ColorIndex = x
The tab is a different colour!
I have a summary page that includes the titles for each tab within the excel 2003 workbook. I want to use the names of the tabs in the summary page and create it into a formula to lookup fixed cells within the various tabs. Sorry for not uploading an excel doc but I was at work earlier and the thread did not load for some reason, so I am reposting it.
View 3 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'm using Excel '03SP2 on Win 2000sp4. I believe I have a case where old tabs originally written in Excel ' 97 behave differently than new tabs in the same workbook, which is saved in 2003 format.
Specifically, the formula ="PLAN" & budyr-1 where budyr is a named range on a different tab containing 2008 . This formula yields PLAN 2007 on a new tab and #VALUE! on an old tab.
How do I get Excel to update the old tabs so that they behave as Excel 2003 tabs?
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 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 Replies View RelatedI 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...........
Is there anyway to have tabs within tabs? Right now there are only two layers...workbooks and worksheets within workbooks (tabs). Is there anyway to have more than two layers?
So right now:
1) Workbook
a. Worksheet
b. Worksheet
Can we get to:
1) Workbook
a. Worksheet
i. ?
b. Worksheet
i. ?
ii. ?
No?