Macro To See If File Exists Or Password Protected
Nov 29, 2009
I have written a macro to select a range of cells one by one and open the excel files mentioned in them and execute a task. It works fine. But I want the system to see if the file exists in its folder or if the file is password protected (for opening). Either of the case the file should be skipped without a warning message and any attempt to open. I need a macro for that. Following is the way the cell contents are
I:ORDERSS-S 10ALIYAMARKET ORDERSADDADD-LADIES-LEGGINGS-13246.xls
I:ORDERSS-S 10ALIYAMARKET ORDERSADDADD-LADIES-PANTS-13247.xls
I:ORDERSS-S 10ALIYAMARKET ORDERSADDADD-LADIES-SHORTS-13244.xls
I:ORDERSS-S 10MICHELLEGAMESWORLDWIDE COMPANYWORLDWIDE COMPANY - GAMES - 10014.xls
And following is the VBA code I wrote. It it almost stops when reaching a non-existing file name
View 2 Replies
ADVERTISEMENT
Dec 9, 2006
I have an existing application that uses DAO sql queries to populate a form. It has always worked fine. Earlier this week, I password protected the spreadsheet. Now my DAO query fails. I get a run-time error '3161'. Could not decrypt file.
' Const stExtens As String = "Excel 8.0;HDR=Yes;"
Const stExtens As String = "Excel 8.0;HDR=Yes;PWD=money16;"
Private Sub Execute_Query(SQL)
'Instantiate the DAO objects.
strDb = ThisWorkbook.FullName
Set DAO_ws = DBEngine.Workspaces(0)
' code fails on the line below
Set DAO_db = DAO_ws.OpenDatabase(strDb, False, True, stExtens)
Set DAO_rs = DAO_db.OpenRecordset(SQL, dbOpenForwardOnly)
End Sub
View 3 Replies
View Related
Aug 12, 2013
I have a master file that generates a new file every time the master user run the macro. The macro is pasted here:
Code:
Sub NewWorkbook()
'
ThisWorkbook.Unprotect ("Password01#")
[Code]....
I want the new file to be opening without asking for any password at all. What am I supposed to include in the code for that?
View 9 Replies
View Related
May 31, 2013
I've got a spreadsheet that has password protection before you can "modify" it. All of a sudden today, when I open the spreadsheet and enter the correct password, it still opens but only as Read Only.
View 3 Replies
View Related
Jan 26, 2007
I have a macro in a workbook (good start) as follows:
Sub UnhideSheets()
' Set to Auto Calc mode
With Application
.Calculation = xlAutomatic
End With
' Asks for a password (must be "unhider")
Dim mypass, response As String
mypass = Application.InputBox("This macro requires you to enter a password to proceed." & vbCrLf & "Please enter password below.")
' If password is correct
If LCase(mypass) = "unhider" Then
' Unhides all sheets
Dim i As Integer
For i = 1 To Sheets.Count
Sheets(i).Visible = True
Next i
' Then tells you that all is OK
response = MsgBox("All sheets unhidden", 0, "Macro run")
' Otherwise
Else
' Tells you that there is a problem (Unauthorised to continue)
response = MsgBox("Sorry, you are not authorised to use this macro.", 16, "Macro stopped")
' hides the sheet again
Sheets("BSG Only!").Visible = xlHidden
Sheets("CC07").Activate
' And ends the "if"
End If
End Sub
This unhides the "very hidden" sheets that make the book work and is password protected because I want to limit the people who can see this data.
What I would like to do, however, is call this macro remotely from another procedure in a separate book, which can only be accessed by those who are authorised to see the hidden data.
Essentially, then, my question is: "How do I call the protected procedure without the user having to enter the password each time, as they must be authorised to have access to the procedure that calls the protected procedure?"
View 3 Replies
View Related
Jun 6, 2014
In 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
View 2 Replies
View Related
Feb 23, 2007
I've got a work book with numourous password protected sheets which i quite often have to update (as i use around 10 of these with at least 10 sheets in each its time consuming). I've had several goes at creating 2 macros to unlock and then lock the sheets (with my password). I've managed to create on that unlocks the sheets using the password but i can't get a macro to lock the sheets up again using the password.
View 9 Replies
View Related
Jul 25, 2012
I am having an issue with a macro to open password protected workbooks. The macro works just fine in opening the files and whatnot, but for some reason it prompts me to enter the password again once the file has been opened. Funny thing is I can either hit OK or hit Cancel and it goes to the next file. All files open correctly, I was just curious as to why this is happening and how to correct it?
View 1 Replies
View Related
Mar 21, 2007
I 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 Related
Mar 6, 2012
I have a file used by numerous facilties. I would like code to track any time a protected sheet has been unprotected / protected. I would also like the stamp to show the user data if that can be done.
View 2 Replies
View Related
Jan 27, 2008
Before my workbook is open the following code is run, which asks the user to enter the password. Depending on the password Range("name").Value takes values from the worksheet "Data" from table "M4:M20". The list of passwords is in the table "L4:L20". My code seems to be not optimal (too long). Does anybody know how to optimize this code?
Sub GoodMorning()
On Error Goto Error
'Prompt the user for a password and unhide the worksheet if correct
Select Case InputBox("Please enter the password", _
"Enter Password")
Case Is = ""
Call HideSheets
MsgBox "Sorry, that password is incorrect! Please contact the administrator.", _ ............
View 2 Replies
View Related
Nov 10, 2009
How do i get use macros when the excel doc. is password protected?
View 9 Replies
View Related
May 15, 2014
i want to protect my all sheets at once
View 3 Replies
View Related
Sep 16, 2013
Password protected VBA module causes Excel to crash on debugs. Macros work fine if I open VBE and enter my password.
I'm using Range.("This range does not exist").Select to force a debug.
If I run my macro without entering my module password, the debug window appears and Excel crashes.
If I run my macro after entering my module password, the VBE window opens and it debugs normally.
I'm 90% sure the password protection is the problem. I want to keep my code password protected, but I don't want my project to crash on an error.
View 3 Replies
View Related
Mar 17, 2013
how to create and add password to a default windows zip file using vba excel macro.
View 2 Replies
View Related
Sep 13, 2013
What if you forgot the password in a protected sheet? is there a way to unlock it?
View 1 Replies
View Related
Dec 2, 2013
I have a master document which maintains employees vacation an lieu time. I want to create a document for each employee where they can view all of their own person information by linking it to the master. The only problem is is that the master document is password protected. They can't have the password or they could access the master document and other employees confidential information. Is there a way to update there own document without entering the password or codon so the password automatically enters without them seeing it.
View 2 Replies
View Related
Sep 16, 2009
I use the follwing code to update an access database from excel.
View 2 Replies
View Related
Nov 7, 2011
Code:
Sub Open_Test_File()
Dim wb As Workbook
Set wb = Application.Workbooks.Open("DesktopTest File.xls")
End Sub
This very simple little code opens a new workbook.
But if I add a password to the file that I'm going to open the password box appears.
What do I need to add to this code to automatically input this password?
I have tried putting this at the end:
Code:
Password:="123"
but this does not work?
View 2 Replies
View Related
Jan 24, 2012
I have a master for each manager that pulls a few values from each of their employees personal sheets.
The personal sheets (about 30) are individually password protected so only the owners can open them.
This is creating a security issues as the links in the master require the passwords for each of the "source" workbooks.
Is there any way to add some code so that the passwords do not need to be entered each time?
View 9 Replies
View Related
Jan 24, 2012
I have all of the passwords. I just want to avoid having to type in all 30+ of them each time I open the master sheet.
I have a master for each manager that pulls a few values from each of their employees personal sheets.
The personal sheets (about 30) are individually password protected so only the owners can open them.
This is creating a security issues as the links in the master require the passwords for each of the "source" workbooks.
Is there any way to add some code so that the passwords do not need to be entered each time?
View 1 Replies
View Related
Feb 15, 2013
I would like to copy a worksheet that is password protected. When I copy the whole sheet it says, cannot change part of a merged cell and nothing is copied.
Is there a way to override password protection without knowing the password?
View 2 Replies
View Related
Apr 10, 2013
I have an add-in which I want to share with others, but I want to protect the code from modification.
I know how to apply a password to a VBA project (Tools -> Project Properties -> Protection) but the problem is this: when a colleague installs the add-in, the subroutines within the add-in are not available in the Macros list to be added to the ribbon (in the Customize Ribbon window). The subroutines only appear when I remove the password.
View 1 Replies
View Related
Nov 1, 2013
I have the following VBA in my spreadsheet.
Code:
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
ActiveSheet.Unprotect ("kellyz")
If Intersect(Target, Columns("o:o")) Is Nothing Then Exit Sub
For Each C In Intersect(Target, Columns("O:O"))
[Code] ......
As soon as i type anything in the columns, my sheet is unprotected. I need the sheet protected so that the users can not change my formulas.
View 2 Replies
View Related
Apr 18, 2009
My question is as follows:
I have two workbooks in the same folder on a shared drive. Workbook2 is linked to workbook1. I have protected Workbook1 with a password protected to limit access.
When my collegues who use workbook2 try to open it, it asks for the password for workbook1 before opening. When they ignore that and go a head to open the file. The new information from workbook1 is not updated into workbook2.
How can i mentain my password in workbook1, and keep the files linked such that they can be able to see the new information in workbook2 without knowing the password for workbook1.
View 9 Replies
View Related
Oct 9, 2009
I am trying to import data into Excel from a webpage using the web query function; however, the webpage requires a login and password. I have the required login and password, but I cannot figure out how to make excel automatically input these into the correct fields and login in order to import the data.
Since I am trying to make all of our databases update automatically, I don't want to enter this info everyday when the macro runs.
View 9 Replies
View Related
Aug 25, 2006
I've got two files: the one that is the source file and the second one which is the target file. The target file is password protected (let us take the number 1 as the password in this case). I have a macro that would copy the value of an example cell to the target file:
Sub iso()
Dim wBook As Workbook
Range("A2").Activate
ActiveCell.Copy
On Error Resume Next
Set wBook = Workbooks("Test2.xls")
If wBook Is Nothing Then
ChDir "D:"
Set oWB = Workbooks.Open(Filename:="D: est2.xls")
to add a line (or two) to this code, that would open and unprotect the target file and then at the and protect the target file with the same password.
View 8 Replies
View Related
Jun 6, 2014
I want to create a simple form for employees to enter their number of hours worked for the day. Driver name, Start Time, Finish Time and date. I need this information to populate an excel spreadsheet but I don't want the employees to be able to view the data that is being put in. Also possibly throw an error if the same employee accidentally enters their information twice.
View 1 Replies
View Related
Aug 28, 2013
I read somewhere that password of a protected excel sheet is located in the sheet itself , hidden somewhere. So , it can be located by some "curious" ones.
Second question is , how can we find that password and prevent anyone from detecting it?
View 1 Replies
View Related
Feb 15, 2012
I'am trying to make a button that will let me send a email via outlook. trick is work book is password protected but need to send some of the data contained to perssonel that dont have the password so sending teh complete work book doesnt work just need something simple. I have learned all ( little) i know from reading and searching here.
no links to other sites as my firewall here at work will possibly reject it
View 9 Replies
View Related
