Custom Page Headers

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

I want to show the contents of a cell in the page header when I print the
document. Does anyone have a solution for this?
 
Private Sub Workbook_BeforePrint(Cancel As Boolean)
ActiveSheet.PageSetup.CenterHeader = ActiveSheet _
..Range("A1").Value
End Sub

---
Place this macro in the "ThisWorkbook" module.

HTH
Jason
Atlanta, GA
 
You must log in or register to reply here.

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Add a new row in Named Table (Table1) and add data from txtboxes into last empty cells based on header named of the Table1 0
Print area query 1
F at the top of the page 1
Header Insanity 2
Access Page Header with merge field 0
no of pages in excel worksheet (not workbook) 9
Printing header rows.. 5
Cell content in custom header: How? 5

Back
Top