Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
836to840
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
836to840
836to840
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Dauerhafte Variable

Dauerhafte Variable
13.01.2007 19:40:19
dreho
Hallo,
was muss ich tun, damit die Varialbe UserName während der ganzen Excel-Sitzung aktiv ist.
(Ich bin am Lernen von VBA)
Danke für Antwort und Gruss dreho
Declare Function GetUserName Lib "advapi32.dll" Alias "GetUserNameA" _
(ByVal lpBuffer As String, nSize As Long) As Long

Sub windows_user_Name()
Dim lpBuff As String * 25
Dim ret As Long, UserName As String
ret = GetUserName(lpBuff, 25)
UserName = Left(lpBuff, InStr(lpBuff, Chr(0)) - 1)
End Sub


Sub msgbox_UserName()
MsgBox "Angemeldeter User ist: " & UserName
End Sub

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Public-Variable
13.01.2007 20:55:15
{Boris}
Hi,
deklariere die Variable in einem allgemeinen Modul AUSSERHALB einer Prozedur - also ganz oben - mit:
Public UserName As String
Grüße Boris
AW: Dauerhafte Variable
13.01.2007 21:16:01
Ali
Hi,
das kannste einfacher haben:

Sub ali()
MsgBox Environ("Username")
End Sub

mfg Ali
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige