Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
oh, and another thing
in addition to my previous entry and completely un-
related, Is there anyway to return a string for whichever user is logged on? We use Xp and log in in the usual way and it would be useful to have something like dim currentuser as string if currentuser = "ARoberts" then usefform21.show blah blah blah end if |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
oh, and another thing
Hi
try msgbox Environ("UserName") -----Original Message----- in addition to my previous entry and completely un- related, Is there anyway to return a string for whichever user is logged on? We use Xp and log in in the usual way and it would be useful to have something like dim currentuser as string if currentuser = "ARoberts" then usefform21.show blah blah blah end if . |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
oh, and another thing
Hi Ted,
Here's a simple little function to get it Public Declare Function GetUserName Lib "advapi32.dll" _ Alias "GetUserNameA" _ (ByVal lpBuffer As String, _ nSize As Long) As Long Public Function UserName() As String Dim sName As String * 256 Dim cChars As Long cChars = 256 If GetUserName(sName, cChars) Then UserName = Left$(sName, cChars - 1) End If End Function -- HTH Bob Phillips ... looking out across Poole Harbour to the Purbecks (remove nothere from the email address if mailing direct) "ted daniels" wrote in message ... in addition to my previous entry and completely un- related, Is there anyway to return a string for whichever user is logged on? We use Xp and log in in the usual way and it would be useful to have something like dim currentuser as string if currentuser = "ARoberts" then usefform21.show blah blah blah end if |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
not sure if i'm using the right thing | Excel Worksheet Functions | |||
Oh, just one more thing | Excel Discussion (Misc queries) | |||
One Last Thing | Excel Discussion (Misc queries) | |||
one more thing | Excel Worksheet Functions | |||
New to this thing | Excel Programming |