Beste Online Casinos
Windows-Benutzernamen ermitteln (VBA)

02.12.1998


� Den Windows-Benutzername k�nnen Sie mit wenig Zeilen Code ermitteln.
���� Beachten Sie aber den Unterschied zum Excel-Benutzernamen !
���� Der Windows-Benutzername wurde beim Windows-Setup
���� angegeben und kann nicht ganz so einfach ge�ndert werden,
���� wie der Excel-Benutzername.
���� Diesen �ndern Sie unter "Extras" - "Optionen" - "Allgemein".

���� F�gen Sie ein neues Modul ein.
���� Erzeugen Sie folgendes Makro:

   Declare Function GetUserName Lib "advapi32.dll" _
      Alias "GetUserNameA" (ByVal lpBuffer As String, _
      nSize As Long) As Long
   Sub UserName()
      Dim B As String * 100
      Dim L As Long�
      L = 100�
      GetUserName B, L
      MsgBox Left(B, L - 1)
   End Sub

��� Sie ermitteln den Benutzernamen, den Sie auch unter
��� Eigenschaft f�r System finden.
��� "Start" - "Einstellungen" - "Systemsteuerung" - "System",
��� oder �ber den Shortcut Win+Pause.

Additional resources