Ändern Sie den Benutzernamen mit VBA - VBA-Codebeispiele

In diesem kurzen Tutorial wird gezeigt, wie Sie die Application.UserName-Methode verwenden.

Abrufen und Ändern des Anwendungsbenutzernamens in VBA

Benutzernamen abrufen

Sie können verwenden Anwendung.Benutzername zum Zurückgeben oder Setzen des Namens des aktuellen Benutzers. Dies ist der Standardname, der in „Makro aufgezeichnet von“, neuen Kommentaren, „Zuletzt gespeichert von“ usw. angezeigt wird.

Sie können den Namen des aktuellen Benutzers in einem Meldungsfeld wie folgt anzeigen:

MsgBox "Aktueller Benutzer ist " & Application.UserName

Benutzernamen ändern

Sie können den aktuellen Benutzernamen wie folgt ändern:

Application.UserName = "MonkeyCoder"

Wenn Sie interessiert sind, wer der Autor des aktuellen Arbeitsbuchs ist, können Sie es wie folgt abrufen:

UserNameAuthor = ThisWorkbook.BuiltinDocumentProperties("Autor")

Sie können es auch ändern:

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

Der Windows-Benutzername kann wie folgt abgerufen werden:

BenutzernameWindows = Umgebung("Benutzername")

<