inserting current windows user id into a cell
 

Does anyone know of a function or macro that will allow the current windows
userid to be displayed in a cell such as: "Printed by: userid"? Any help is
greatly appreciated.

inserting current windows user id into a cell
 

Hi,

Try this

Private Sub Workbook_BeforePrint(Cancel As Boolean)
Sheets("Sheet1").Range("A1") = "Printed by " & Environ("Username")
End Sub

Mike

"MartyMack74" wrote:

Does anyone know of a function or macro that will allow the current windows
userid to be displayed in a cell such as: "Printed by: userid"? Any help is
greatly appreciated.

inserting current windows user id into a cell
 

On Fri, 13 Nov 2009 14:37:25 -0800, Gord Dibben <gorddibbATshawDOTca wrote:

Ron

This is not Windows UserID

Environ("UserName") is login name.


Gord

Thanks for pointing that out.
--ron