Microsoft Word Programmierung - Das Handbuch (Buch + E-Book). Für Word 2007 - 2013

Name des angemeldeten Benutzers ermitteln

Manchmal kann es für bestimmte Aktionen in Makros notwendig sein, den am Rechner gerade angemeldeten Benutzernamen zu wissen. Beispielsweise um benutzerspezifische Daten anzuzeigen.

Dazu stehen Ihnen zwei Möglichkeiten zur Verfügung:

Die erste greift auf die Umgebungsvariablen des Systems zu und liest sie mittels der Environ-Funktion aus. Über die Umgebungsvariablen Computername und Username erhalten Sie den Namen des Computers und des aktiven Benutzers, wie Listing 2.21 veranschaulicht.

Sub subGetUserNameEnviron()
  Dim strEnv As String
  strEnv = Environ("Computername") & "\" & Environ("Username")
  MsgBox strEnv, vbInformation, "Angemeldeter Benutzer(Umgebungsvariablen)"
End Sub

Listing 2.21 Ausgabe des angemeldeten ...