Thread
:
Footer font formating in Excel
View Single Post
#
2
Posted to microsoft.public.excel.programming
STEVE BELL
external usenet poster
Posts: 692
Footer font formating in Excel
Dim zm As Single, FS As Single
zm = ActiveSheet.PageSetup.Zoom
FS = 12 * (100 / zm)
'
With ActiveSheet.PageSetup
.LeftFooter = "&" & FS & "MyFooter"
End With
amend to fit your needs...
--
steveB
Remove "AYN" from email to respond
"Brian Barbre" <Brian
wrote in message
...
I wrote
VB
to format my footer font in excel to a certain point size. I
also
have to scale the page I am printing to 1 wide by 1 tall. I want the font
to
appear the same size on all the pages that I am printing, but becasue each
page is scaling differently the font appears larger or smaller when
printed.
***Is there a way to scale the page being printed in excel, without
scaling
the footer (or header) font.***
Reply With Quote
STEVE BELL
View Public Profile
Find all posts by STEVE BELL