Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Old January 30th 06, 03:18 PM posted to microsoft.public.excel.setup
dneal53
 
Posts: n/a
Default Insert current author's name in cell or footer in Excel??

I have created a spreadsheet for my department to use to list their projects
for each week. Just wondering if there is an automatic way to have the
various author's names inserted in the footer or in a cell without them
needing to do it. Any suggestions would be appreciated...

  #2   Report Post  
Old January 30th 06, 05:50 PM posted to microsoft.public.excel.setup
David McRitchie
 
Posts: n/a
Default Insert current author's name in cell or footer in Excel??

Does that equate to the person submitting to print with the name
they want to use --- application.username
or are you trying to do something for security purposes as to who
printed it from a network logon, a little less beyond their control
(printing easily bypassed/modified).

Some references on my site:
http://www.mvps.org/dmcritchie/excel/userid.htm
http://www.mvps.org/dmcritchie/excel/pathname.htm
http://www.mvps.org/dmcritchie/excel/property.htm

My own choice would be installing a macro to be invoked by user
before printing. I prefer this to automatically including when printing
anything because one might occasionally print someone else's
material or want a different format..

Header
left: (blank)
middle: title
right: username
Footer
left: full pathname -- modified for readability
middle: Page x of xx
right: date and time as in yyyy-mm-dd hh:mm

Read about the following code with your modification to include username
http://www.mvps.org/dmcritchie/excel...ame.htm#footer
I would assign the following code to a toolbar button (smilyface)

Sub PutFileNameInFooter()
'Documented in http://www.mvps.org/dmcritchie/excel/pathname.htm
'alternative -- lowercase for pathname Sheetname as is within square brackets
'also using an 8 point font, lettercase of Sheetname is unchanged in this
'example because you have control and can change it within the workbookbook
'Use of WITH provide a prefix for names that begin with a period
With ActiveSheet.PageSetup
'-- modified to include username -- special request 2006-01-30
.RightHeader = application.username
.LeftFooter = "&8" & _
LCase(Application.ActiveWorkbook.FullName) & " &A "
If .RightFooter = "" Then .RightFooter = "Page &P of &N"
End With
End Sub

If unfamiliar with macros see
http://www.mvps.org/dmcritchie/excel/getstarted.htm
for help in searching newsgroups
http://www.mvps.org/dmcritchie/excel/xlnews.htm
and use of your real name would be more friendly.

---
HTH,
David McRitchie, Microsoft MVP - Excel [site changed Nov. 2001]
My Excel Pages: http://www.mvps.org/dmcritchie/excel/excel.htm
Search Page: http://www.mvps.org/dmcritchie/excel/search.htm

"dneal53" wrote in message ...
I have created a spreadsheet for my department to use to list their projects
for each week. Just wondering if there is an automatic way to have the
various author's names inserted in the footer or in a cell without them
needing to do it. Any suggestions would be appreciated...





Reply
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
how do I insert the current time (static) and date in a cell? DF Excel Discussion (Misc queries) 5 October 28th 05 05:54 PM
In Excel, how do I insert User Name (author) in a cell. George B. Excel Discussion (Misc queries) 3 August 23rd 05 11:46 PM
how do i automatically insert the current author's name in a cell. Nolin Excel Worksheet Functions 1 April 8th 05 04:38 AM
How can I insert a value from an Excel Worksheet into a footer? S Barker Excel Discussion (Misc queries) 4 March 30th 05 01:40 AM
how do i insert the current time into a cell, and show different . Dave Excel Discussion (Misc queries) 1 March 22nd 05 07:57 PM


All times are GMT +1. The time now is 11:44 AM.

Powered by vBulletin® Copyright ©2000 - 2021, Jelsoft Enterprises Ltd.
Copyright 2004-2021 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"

 

Copyright © 2017