Benutzer anzeigen

Gast #250814
Lesenswert?

das makro hab ich.
Sub User_ermitteln()

     'den aktuellen User ermitteln (NUR NT, 2000, Xp)
     Benutzer = Environ("UserName")

     MsgBox "Benutzer ist " & Application.UserName

End Sub


da kommt mir aber die MsgBox. das will ich ja nicht. ich will das mir
der Name in der Zelle erscheint.
das blick ich nicht.
Gast #250816
Lesenswert?

Hey danke das funktioniert.

Noch n e frage wie bekomme ich das hin das wenn ein anderer User das
öffnet das automatisch der name kommt. Momentan muss ich immer erst das
Makro laufen lassen, dann erst kommt sein Name.
Gast #250818
Lesenswert?

Hab fast das gleiche Problem, wie danki nur das ich den Namen des User
des Betriebssystem anzeigen lassen will und nicht vom Excel.

Unter dem Assistenten finde ich nichts. Könnte mit vieleich jemand
helfen???
Gast #250819
Lesenswert?

Für WinNt, 2000:

Declare Function GetUserName Lib "advapi32.dll" Alias
"GetUserNameA" (ByVal lpBuffer As String, nsize As Long) As Long

Function NetworkUsername()
Dim Username As String * 255
Dim b As Integer
b = GetUserName(Username, 255)
NetworkUsername = Left$(Username, InStr(1, Username, Chr(0)) - 1)
End Function

sub bla()
msgbox NetworkUsername
end sub

Antwort schreiben

Bitte melde dich an, um einen Beitrag zu schreiben.

oder

Mit Google-Account einloggen

Die Registrierung ist kostenlos und dauert nur eine Minute.

Jetzt registrieren