Dear
The following
code<http://www.ozgrid.com/forum/autolink.php?id=1&script=showthread&forumid=8>will
put a Left
header<http://www.ozgrid.com/forum/autolink.php?id=37&script=showthread&forumid=8>in
each
worksheet<http://www.ozgrid.com/forum/autolink.php?id=18&script=showthread&forumid=8>in
the workbook using the value of
range<http://www.ozgrid.com/forum/autolink.php?id=5&script=showthread&forumid=8>(A3)
in sheet1.
Is this u looking for!!
Sub PrintReport()
Dim wks As Worksheet
Dim ftr
ftr = Sheet1.Range("A3").Value
For Each wks In Worksheets
With wks.PageSetup
.LeftHeader = "&""
Times<http://www.ozgrid.com/forum/autolink.php?id=20&script=showthread&forumid=8>New
Roman,Italic""" & ftr
End With
Next wks
End Sub
Gohar
On Thu, Apr 9, 2009 at 10:08 AM, Mahreen Ellahi <mahreen.a...@googlemail.com
> wrote:
> I have few cells in excel worksheet that I want to show as header in print
> copy. Can any one tell me how to select those cells to show as print header.
>
>
> Regards
> Mahreen
>
> >
>
--~--~---------~--~----~------------~-------~--~----~
-------------------------------------------------------------------------------------
Some important links for excel users:
1. Excel and VBA Tutorials(Video and Text), Free add-ins downloads at
http://www.excelitems.com
2. Excel tutorials at http://www.excel-macros.blogspot.com
3. Learn VBA Macros at http://www.vbamacros.blogspot.com
4. Excel Tips and Tricks at http://exceldailytip.blogspot.com
To post to this group, send email to excel-macros@googlegroups.com
If you find any spam message in the group, please send an email to:
Ayush Jain @ jainayus...@gmail.com or
Ashish Jain @ 26may.1...@gmail.com
-------------------------------------------------------------------------------------
-~----------~----~----~----~------~----~------~--~---
