Změňte uživatelské jméno pomocí VBA - Příklady kódu VBA

Tento krátký návod předvede, jak používat metodu Application.UserName.

Získejte a změňte uživatelské jméno aplikace ve VBA

Získat uživatelské jméno

Můžeš použít Application.UserName pro vrácení nebo nastavení jména aktuálního uživatele. Toto je výchozí název, který se zobrazuje v „makru zaznamenáno“, nových komentářích, „naposledy uloženo“ atd.…

V okně zprávy můžete zobrazit jméno aktuálního uživatele takto:

MsgBox "Aktuální uživatel je" & Application.UserName

Změnit uživatelské jméno

Aktuální uživatelské jméno můžete změnit takto:

Application.UserName = "MonkeyCoder"

Pokud vás zajímá, kdo je autorem aktuálního sešitu, můžete jej získat takto:

UserNameAuthor = ThisWorkbook.BuiltinDocumentProperties ("Autor")

Můžete také změnit:

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

Uživatelské jméno Windows lze získat takto:

UserNameWindows = Prostředí ("UserName")

<

wave wave wave wave wave