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
|