View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
BlueWolverine BlueWolverine is offline
external usenet poster
 
Posts: 36
Default Font in Header - @22 "25 Miles" goes to 409 font

Hello,

MS EXCEL 2003 in XP PRO (Actually controlled from vba in access 03)

Hello.

I am trying to set the header in vba for the print area in excel. The code
is right but the problem is if the variable starts with a number.

..CenterHeader = "&""Copperplate Gothic Bold,Bold""&22" &
CStr(in_ChecklistName & " Checklist")

if in_ChecklistName starts with a number, it contributes to the font size.

So if

in_ChecklistName = "25 Mile Drive"

then it behaves as if the code read like so.

..CenterHeader = "&""Copperplate Gothic Bold,Bold""&2225"" Mile Drive"

Which obviously causes the header font to go HUGE.

What can I do to fix this? Note: works perfectly if the in_ChecklistName
variable starts with a letter.

Thanks.

--
BlueWolverine
MSE - Mech. Eng.
Go BLUE!