'	The code &C&36&U&B tells Excel that the font is centered, 
'	36 pitch, underlined and bold.

ActiveWindow.ActiveSheet.PageSetup.CenterHeader = "&C&36&U&B " & " Title Text"


With ActiveSheet.PageSetup.LeftHeaderPicture  'Set to left header area
   .Filename = "your path to image\image.png"
   .Height = 100
   .Width = 150
   .Brightness = 0.36
   .ColorType = msoPictureAutomatic
   .Contrast = 0.36
   .CropBottom = 0
   .CropLeft = 0
   .CropRight = 0
   .CropTop = 0
End With

' Enable the image to show up in the left header.

ActiveSheet.PageSetup.LeftHeader = "&G"