Howdy,
I have been at this for days and just can not figure it out. I don't ever use VBA so i'm crash coursing it pretty hard.
I was able to make the header reference two cells, and even put a line break in between the two.
My next step is to make the first cell Calibri, Bold and 22 font. And the second referenced cell to show up as Calibri, bold, 12 font.
So basically like this:
12345
Plant 2
I say basically because the size selection is off here i think, but generally this is what i am looking to accomplish.
Here is the code i am using thus far:
This code calls the cells properly, but i just can't get the formatting to stick.![]()
Private Sub Workbook_BeforePrint(Cancel As Boolean) With ActiveSheet.PageSetup .RightHeader = Range("Calculations!B36").Value & Chr(13) & "Plant " & Range("=Calculations!B37").Value End With End Sub
Calculations!B36 needs to be Calibri, Bold, and 22 point font.
"Plant " and Calculations!B37 need to be Calibri, Bold and 12 point font.
Oh and it all needs to be right justified, but that is automatic being in the right header pane.
Any help would be appreciated.
Thanks in advance :D
Bookmarks