title: Header Footer Format and formula
body: <p>I would like to take a cell reference to another worksheet and put that in the center header and format it to a specific font and size.
  Next, I'd like to take the Right header and have either the name of my report as the top, with a bold font of specific size while the line below has a separate size and is not bold.  Like below:</p>
  
  <p><strong>Compliance Report</strong>  (This doesn't need to be cell referenced, it can stay the same).</p>
  
  <p>Policy Date 2014 | 9/30/15 (This changes from account to account and need to come from a source range.)</p>
  
  <p>I started with this code:</p>
  
  <pre><code>Sub header()
      With Worksheets("Sheet1").PageSetup
          .RightHeader = Worksheets("Compliance Report").Range("a99") _
              &amp; Chr(10) &amp; Worksheets("Compliance Report").Range("a100")
          End With
  End Sub
  </code></pre>
  
  <p>It works for getting the data on two lines, but I can't format it.  I'm not tied to sticking with this formula if there is a better option.</p>