L
lanser
I would like to be able to add the user name to a cell in a spreadshee
using Application.UserName can anyone help please
using Application.UserName can anyone help please
B
Bob Phillips
Range("A1") = Application.Username
--
HTH
Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)
--
HTH
Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)
D
Don Guillett
try
[a20] = Application.UserName
[a20] = Application.UserName
R
Ritujoy
lanser, you've identified the correct object. It really comes down to
how you want to use it? If you want it in a function:
Function AppInfo(AppInfoType As Integer)
If AppInfoType = 1 Then
AppInfo = Application.UserName
Else
AppInfo = "Enter Info Type"
End If
End Function
In a worksheet if you type ---> "=AppInfo(1)"
the result will be the user name
If you want it to be programmatic, then just stick that just assign
application.username to a variable and do what you will with that
variable. I might have misunderstood. Hope that helps.
how you want to use it? If you want it in a function:
Function AppInfo(AppInfoType As Integer)
If AppInfoType = 1 Then
AppInfo = Application.UserName
Else
AppInfo = "Enter Info Type"
End If
End Function
In a worksheet if you type ---> "=AppInfo(1)"
the result will be the user name
If you want it to be programmatic, then just stick that just assign
application.username to a variable and do what you will with that
variable. I might have misunderstood. Hope that helps.
L
lanser
Thanks for the help everything hunkydory now 
regards
Joh
regards
Joh