I would like to create a macro that automatically runs when the worksheet is
printed (prior to actually) I currently have a button that runs this macro
when clicked:

Sub Header()
Dim Header As String
Header = Range("D2").Value
With ActiveSheet.PageSetup
.CenterHeader = "&12Service Body & Options" & Chr(10) & "APS Vehicle#"
& _ Header
End With
End Sub

I would like to get rid of this button and have this routine run when the
printer icon or FilePrint is selected. I played with the
App_WorkbookBeforePrint from the help file but could not get it to work right.

Any ideas?