You are not authorize to use this macro.

[Niteshnitesh]

Hi all,

I have macro that I want to share with ten people in my team. I have doubt that they can share this macro with another team. I have a excel file in which from A1: A10 are username of ten employees.This file is located in share drive /F:/Temp files/Book1.xlsx. Every one can access this file.I need a code that validate if username exist in that file then it run, if not it give error "You don't have access to use this macro." That file is password protected.

 

[Drrellik]

you can lock the sheet for editing with a password and only give the password to the 10 people you want to run the macro. you can also password protect the entire workbook then only the ones with a password can even open it to see it. two different password one for the workbook and one for the sheet(s)


Might be easier than VBA

 

[Niteshnitesh]

They can share the password with others

 

[Eric W]

You could put something like this at the top of your macro:

    ValidNames = Array("Huey", "Dewey", "Louie", "Daisy")
    
    If InStr("," & LCase(Join(ValidNames, ",")) & ",", "," & LCase(Application.UserName) & ",") = 0 Then
        MsgBox "Not allowed"
        Exit Sub
    End If