Copy Header and Footer Contents

B

Bala

Hi all,
I am getting the header and footer information using


code:--------------------------------------------------------------------------------
With ActiveSheet.PageSetup
strleftheader = .LeftHeader
strCenterHeader = .CenterHeader
strRightHeader = .RightHeader
strLeftFooter = .LeftFooter
strCenterFooter = .CenterFooter
strRightFooter = .RightFooter
End With
--------------------------------------------------------------------------------

What I need is the entire header and footer "content" to be pasted in
word document.
An Example:
I am getting strleftheader as &"Tahoma,Bold"&12xyaaaa
&P&N&D&T&Z&F&F&A&G
whether I need to decode it and then paste it in word.
Do anyother ways exist to copy the excel header and footer "content"
to word.
Thanks in advance,
kmbase.
 
Top