Can someone point an old man in the right direction here. I am setting a
header font size and using a variable for the header text. This works just
fine:

Dim strAddress As String

Sub Header()
strAddress = "Main St"
Worksheets("Sheet1").PageSetup.CenterHeader = "&24" & strAddress
End Sub

But when there is a number in the string, the font size becomes huge, as in
this:

Dim strAddress As String

Sub Header()
strAddress = "48 Main St"
Worksheets("Sheet1").PageSetup.CenterHeader = "&24" & strAddress
End Sub

Is it syntax or dimmed wrong?

Mike F

It would seem that the second figure i.e. the address is also being
interpreted as a font size. Try using strAddress = " 48 Main Street" (space
after the first ")

I got that same impression, but I am not sure why??? Since the strAddress
comes from a textbox the following code works, thanks to your suggestion.

Dim strAddress As String

Sub Header()
strAddress = "48 Main St"
strAddress = " " & strAddress
Worksheets("Sheet1").PageSetup.CenterHeader = "&24" & strAddress
End Sub

Mike F

"bigwheel" wrote in message
...
It would seem that the second figure i.e. the address is also being
interpreted as a font size. Try using strAddress = " 48 Main Street"
(space
after the first ")

Better yet, put the space right after the font size number:

Sub Header()
strAddress = "48 Main St"
Worksheets("Sheet1").PageSetup.CenterHeader = "&14 " & strAddress
End Sub

Mike F

"Mike Fogleman" wrote in message
...
I got that same impression, but I am not sure why??? Since the strAddress
comes from a textbox the following code works, thanks to your suggestion.

Dim strAddress As String

Sub Header()
strAddress = "48 Main St"
strAddress = " " & strAddress
Worksheets("Sheet1").PageSetup.CenterHeader = "&24" & strAddress
End Sub

Mike F

"bigwheel" wrote in message
...
It would seem that the second figure i.e. the address is also being
interpreted as a font size. Try using strAddress = " 48 Main Street"
(space
after the first ")