Mainiet lietotājvārdu, izmantojot VBA - VBA koda piemēri

Šī īsa apmācība parādīs, kā izmantot metodi Application.UserName.

Iegūstiet un mainiet lietojumprogrammas lietotājvārdu VBA

Iegūstiet lietotājvārdu

Tu vari izmantot Application.UserName lai atgrieztos vai iestatītu pašreizējā lietotāja vārdu. Šis ir noklusējuma nosaukums, kas tiek rādīts “makro ierakstījis”, jauni komentāri, “pēdējo reizi saglabāts” utt.

Jūs varat parādīt pašreizējā lietotāja vārdu šādu ziņojumu lodziņā:

MsgBox "Pašreizējais lietotājs ir" un Application.UserName

Mainīt lietotājvārdu

Pašreizējo lietotājvārdu var mainīt šādi:

Application.UserName = "MonkeyCoder"

Ja jūs interesē pašreizējās darbgrāmatas autors, varat to iegūt šādi:

UserNameAuthor = ThisWorkbook.BuiltinDocumentProperties ("Autors")

Varat arī to mainīt:

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

Windows lietotājvārdu var iegūt šādi:

UserNameWindows = Vide ("Lietotājvārds")

<