Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.setup
|
|||
|
|||
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
Posted to microsoft.public.excel.setup
|
|||
|
|||
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 |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
how do I insert the current time (static) and date in a cell? | Excel Discussion (Misc queries) | |||
In Excel, how do I insert User Name (author) in a cell. | Excel Discussion (Misc queries) | |||
how do i automatically insert the current author's name in a cell. | Excel Worksheet Functions | |||
How can I insert a value from an Excel Worksheet into a footer? | Excel Discussion (Misc queries) | |||
how do i insert the current time into a cell, and show different . | Excel Discussion (Misc queries) |