Print "ActiveWorkbook.FullName" always.....but
Hi from italy.....
so sorry for my bad english...:)
I try to explain what I search :
I want that the code under work always , with all workbook (past and future)
:
Private Sub Workbook_BeforePrint(Cancel As Boolean)
Dim WS As Worksheet
For Each WS In ActiveWorkbook.Worksheets
WS.PageSetup.LeftHeader = ActiveWorkbook.FullName
Next WS
End Sub
where to put it ???
but i search also the code for print some sheet (If I want) without the
"header"
simply push a botton on menu-bar.
can you hel me ?
TIA
|