Ši trumpa pamoka parodys, kaip naudoti „Application.UserName“ metodą.
Gaukite ir pakeiskite programos vartotojo vardą VBA
Gaukite vartotojo vardą
Tu gali naudoti Application.UserName norėdami grąžinti ar nustatyti dabartinio vartotojo vardą. Tai yra numatytasis pavadinimas, rodomas „makrokomandoje, kurią įrašė“, nauji komentarai, „paskutinį kartą išsaugojo“ ir kt.
Dabartinio vartotojo vardą galite rodyti pranešimų laukelyje taip:
„MsgBox“ Dabartinis vartotojas yra „& Application.UserName“
Pakeisti vartotojo vardą
Dabartinį vartotojo vardą galite pakeisti taip:
Application.UserName = "MonkeyCoder"
Jei jus domina, kas yra dabartinės darbaknygės autorius, galite ją gauti taip:
UserNameAuthor = ThisWorkbook.BuiltinDocumentProperties ("Autorius")
Taip pat galite pakeisti:
ThisWorkbook.BuiltinDocumentProperties ("Autorius") = "ItsMe"
„Windows“ vartotojo vardą galima gauti taip:
UserNameWindows = Aplinka ("Vartotojo vardas")
<
