I have an application in Excel that queries an Access database. Some users have read-only access to the folder that the application is saved in. These users are not able to run the application as it errors out when referencing the database to open it to query. I do not want to grant all users READ/WRITE access. Is there another way around this? The application errors out at the last line of code that is pasted below.
Thank you!

    Dim wrkJet As Workspace
    Dim dbsFinance As Object
    'Dim conPubs As Connection
    Dim rstTemp As Object
    Dim strSQL As String
    Dim SearchOption As Integer


    UserForm1.optContains_Click


'Open Microsoft Jet and ODBCDirect workspaces, Microsoft
    ' Jet database, and ODBCDirect connection.
    Set wrkJet = CreateWorkspace("", "admin", "", dbUseJet)

    'Enter the location of the database below
    Set dbsFinance = wrkJet.OpenDatabase("C:\Feuerborn\Account-Level Rptg Tool\Acct-Lvl Rptg Tool.mdb")

It is causing an error because of network access rights, not because of file rights. The users can't get into the folder, so there is no application file to access, hence the error. The database does not exist to this code. The code can't see what the user running the code has no right to see.
You need to move the mdb file to a location that all interested users can "see" it.
You can set the rights such that the users code can see it, but if the user opens Windows Explorer (and show hidden files and folders is NOT checked) the user won't see it.
I recently had a similar problem. I moved the back end to SQL to resolve it.
But it is a network rights issue, so coding is not going to get you there.
HTH

mmcdonal