Formatting center header

Hi all,
I'm trying to find some code that will format the center header to Arial Bold, size 14.
Currently I have the center header populated with the cell value E9 using -

ActiveSheet.PageSetup.CenterHeader = Range("E9").Value

I've been digging around on the internet, but can't figure out how to format the text automatically.

Thanks in advance!

Hello RPOD,

Here is the code...

Please Login or Register  to view this content.

One of those cases where recording a macro shows the way:

Please Login or Register  to view this content.

Then change to:

Please Login or Register  to view this content.