Tag: username

VBA Excel用户名授予访问权限

寻找一点帮助，我有一个Excel文件，只应该授予某些用户访问权限，所有员工都有一个用户名，并在他们input任何信息时显示与他们的条目。 我希望能够保护文件，以便只有特定的员工才能访问。 到目前为止，我有 Private Sub Workbook_Open() Dim Users As Variant Dim UName As String Dim UFind As Variant Users = Array("JBLOGS", "DOEJOHN", "ASmith", "JanDoe") UName = Environ("UserName") On Error Resume Next UFind = WorksheetFunction.Match(UName, Users, 0) If Err <> 0 Then MsgBox "You are not authorised to use this Workbook" ThisWorkbook.Close SaveChanges:=False End If End […]