I would like to be able to add the user name to a cell in a spreadshee
using Application.UserName can anyone help please

--
Message posted from http://www.ExcelForum.com

Range("A1") = Application.Username

--

HTH

Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)

"lanser " wrote in message
...
I would like to be able to add the user name to a cell in a spreadsheet
using Application.UserName can anyone help please?


---
Message posted from http://www.ExcelForum.com/

try
[a20] = Application.UserName

--
Don Guillett
SalesAid Software

"lanser " wrote in message
...
I would like to be able to add the user name to a cell in a spreadsheet
using Application.UserName can anyone help please?


---
Message posted from http://www.ExcelForum.com/

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.


lanser wrote in message ...
I would like to be able to add the user name to a cell in a spreadsheet
using Application.UserName can anyone help please?


---
Message posted from http://www.ExcelForum.com/

Thanks for the help everything hunkydory now :)

regards

Joh

--
Message posted from http://www.ExcelForum.com