Gebruikersnaam wijzigen met VBA - VBA-codevoorbeelden

Deze korte zelfstudie laat zien hoe u de Application.UserName-methode gebruikt.

Gebruikersnaam van toepassing ophalen en wijzigen in VBA

Gebruikersnaam ophalen

Je kunt gebruiken Toepassing.Gebruikersnaam voor het teruggeven of instellen van de naam van de huidige gebruiker. Dit is de standaardnaam die wordt weergegeven in "macro opgenomen door", nieuwe opmerkingen, "laatst opgeslagen door" enz …

U kunt de naam van de huidige gebruiker in een berichtvenster als volgt weergeven:

MsgBox "Huidige gebruiker is " & Application.UserName

Gebruikersnaam wijzigen

U kunt de huidige gebruikersnaam als volgt wijzigen:

Application.UserName = "MonkeyCoder"

Als u geïnteresseerd bent in wie de auteur is van het huidige werkboek, kunt u het als volgt verkrijgen:

UserNameAuthor = ThisWorkbook.BuiltinDocumentProperties("Author")

U kunt het ook wijzigen:

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

De Windows-gebruikersnaam kan als volgt worden verkregen:

GebruikersnaamWindows = Omgeving ("Gebruikersnaam")

<