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!!!
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!!!
Datei/Eigenschaften/Datei-Info/Autor
Ciao MikeS
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