Wie finde ich den Benutzernamen?



Excel-Version: 8.0 (Office 97)
nach unten

Betrifft: Wie finde ich den Benutzernamen?
von: Stefan
Geschrieben am: 15.06.2002 - 15:44:44

hi

wie finde ich bei excel den benutzernamen heraus?
Ich habe NT. Bei Application.UserName & _ gibt er mir den gesammtnamen an! Ich will aber den Namen von dem Jeweiligen Benutzer!!!

Danke vielmals!!!


nach oben   nach unten

Re: Wie finde ich den Benutzernamen?
von: MikeS
Geschrieben am: 15.06.2002 - 16:40:54

Hallo,

Datei/Eigenschaften/Datei-Info/Autor

Ciao MikeS


nach oben   nach unten

Re: Wie finde ich den Benutzernamen?
von: Mischa Richter
Geschrieben am: 15.06.2002 - 23:22:19

hei, so ermittelst du den username des im system angemeldeten Users:


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

private sub userName

'Benutzername: #######################
Dim tst As String
Dim Zähler1 As Byte
lpBuffer = "": nSize = 255
tst = GetUserName(lpBuffer, nSize)
LoginName = ""
For Zähler1 = 1 To Len(lpBuffer)
LoginName = UCase(Left(lpBuffer, Zähler1 - 1))
If Asc(Mid(lpBuffer, Zähler1, 1)) < 64 Then
Exit For
End If
Next Zähler1
'#######################################
end sub

Den excel-benutzernamen kann ja jeder ändern!

Mischa
www.miaj.de

 nach oben

Beiträge aus den Excel-Beispielen zum Thema "Arrays multiplizieren"