| Home |
| Search |
| Today's Posts |
|
|
|
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Programming footer
Excellent response!!!
Donald wrote: Great! Was wondering if there was a way to turn it off. Just ask Dave, when he's feeling ten feet tall. -- Donald "Dave Peterson" wrote in message ... Try this version with the extra U: ActiveSheet.PageSetup.RightFooter = _ "&""Brush Script mt,italic""&14&U" & Application.UserName & _ Chr(10) & "&U&""Times New Roman""&8" & "&D &T" One &U turns on the underlining. One &U turns off the underlining. Just like Grace Slick wrote (or something like that!) (Sometimes, I'm too subtle for my own good.) Donald wrote: BTW, I'm running OfficeXP (Excel ver 10.0) -- Donald "Donald" wrote in message ... No U after char(10), the code I posted actually was copied and pasted. Only one 'U' in the code. -- Donald "Dave Peterson" wrote in message ... Can you find the difference: ActiveSheet.PageSetup.RightFooter = _ "&""Brush Script mt,italic""&14&U" & Application.UserName & _ Chr(10) & "&U&""Times New Roman""&8" & "&D &T" ActiveSheet.PageSetup.RightFooter = _ "&""Brush Script mt,italic""&14&U" & Application.UserName & _ Chr(10) & "&""Times New Roman""&8" & "&D &T" (look for an extra &U after the chr(10) portion.) (Sometimes copying and pasting from the newsgroup post is a good thing. <vbg.) Donald wrote: My code is as follows: ActiveSheet.PageSetup.RightFooter = "&""Brush Script mt,italic""&14&U" & Application.UserName & Chr(10) & "&""Times New Roman""&8" & "&D &T" my network login "J_Doe" is returned by <application.username The problem right now is that all of the footer is underlined, not the username only. -- Donald "Dave Peterson" wrote in message ... The code I posted worked nicely for me (xl2002). Can you post your code--and what is returned by application.username? Donald Stockton wrote: Whoops, this actually seems to underline ALL of my footer D.S. *** Sent via Developersdex http://www.developersdex.com *** Don't just participate in USENET...get rewarded for it! -- Dave Peterson -- Dave Peterson -- Dave Peterson -- Dave Peterson |
| Reply |
| Thread Tools | Search this Thread |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Forum | |||
| Excel footer to look like Word footer? | Excel Discussion (Misc queries) | |||
| Programming help | Excel Discussion (Misc queries) | |||
| Programming to VBE | Excel Programming | |||
| Programming lag | Excel Programming | |||
| Landscape Orientation when Footer set using mso-footer-data Disappear | Excel Programming | |||
![Dave Peterson[_3_] is offline](https://www.excelbanter.com/images/SultanThemeVB3R/statusicon/user_offline.gif)
Hybrid Mode
