Skift brugernavn med VBA - VBA -kodeeksempler

Denne korte vejledning viser, hvordan du bruger metoden Application.UserName.

Hent og skift applikationsbrugernavn i VBA

Hent brugernavn

Du kan bruge Application.UserName for at returnere eller indstille navnet på den aktuelle bruger. Dette er standardnavnet, der vises i "makro optaget af", nye kommentarer, "sidst gemt af" osv …

Du kan vise den aktuelle brugers navn i en meddelelsesboks som denne:

MsgBox "Nuværende bruger er" & Application.UserName

Skift brugernavn

Du kan ændre det aktuelle brugernavn således:

Application.UserName = "MonkeyCoder"

Hvis du er interesseret i, hvem der er forfatter til den aktuelle projektmappe, kan du få den sådan her:

UserNameAuthor = ThisWorkbook.BuiltinDocumentProperties ("forfatter")

Du kan også ændre det:

ThisWorkbook.BuiltinDocumentProperties ("Author") = "ItsMe"

Windows -brugernavn kan fås således:

UserNameWindows = Environ ("UserName")

<