How to format header footer when using BeforePrint to use a cell reference?

Hi everyone,

I have found great answers that come close to answering the question I have, but because I know nothing about VB, I don't know how to adapt those answers to get the exact solution I need. Here it is:

Using Excel 2007, I am using a piece of code I found online to use a cell reference to populate the left header of my worksheet. The code is below. It works great. However I need the resulting text to be formatted in a particular way. The formatting I need is:

Arial
size 12
bold
RGB colors: 0,51,102

So, how does the code below need to look to incorporate these specifications? If someone could rewrite it for me, I will be hugely grateful.

Private Sub Workbook_BeforePrint(Cancel As Boolean)
ActiveSheet.PageSetup.LeftHeader = ActiveSheet.Cells(4, 1)
End Sub

Thanks in advance,
Frank

Try this (not sure about the color, try the macro recorder for that)

ActiveSheet.PageSetup.LeftHeader = "&""Arial,Bold""&12" & ActiveSheet.Cells(4, 1)

Yes! This does the trick. Thank you very much.

Thanks for the suggestion on the text color. I would rather it be part of the BeforePrint function so that it happens automatically, rather than relying on someone having to run a macro each time.

That did it! Fantastic! It gave me a brownish rather than bluish color, but I can figure out what the best hex value is. I just didn't know where or how to put it.

You both rock. Thank you both for your time and expertise.

This topic is solved.