logon name in footer

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

I found this code for putting the user name found in Tools, options into the
footer

Private Sub Workbook_BeforePrint(Cancel As Boolean)
ActiveSheet.PageSetup.RightFooter = Application.UserName
End Sub

How could this be changed to show the logon name. I tried changing
Application to Environ but that didn't work.

Thanks for your help!!
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Format date in footer to propercase? 8
Change Header/Footer w/ Worksheet Option Buttons 1
Print signature lines as footer 1
multiple conditions for if then else 2
To get the same header,footer and sheet titles across multiple sheetsof a workbook. 1
BeforePrint Add In 10
Workbook_BeforePrint 2
Print Page Totals 8

Back
Top