Header & Footer Font

[World22]

I am Trying to make a variable Bold in the Header. But I just can't seem to figure it out can anyone HELP?

Sub Header4()
x = Range("a1").Value

Worksheets("Sheet1").PageSetup.LeftHeader = _
"&""Arial,Bold" & x
End Sub

 

[PHV]

Like this ?
.LeftHeader = "&""Arial,Bold""" & x

Hope This Helps, PH.
Want to get great answers to your Tek-Tips questions? Have a look at FAQ219-2884 or FAQ181-2886