place cell value in header
Run this macro whenever you wish to capture the value in A2 in the header:
Sub Macro1()
v = Range("A2").Value
ActiveSheet.PageSetup.CenterHeader = v
End Sub
--
Gary''s Student - gsnu200800
"KHogwood-Thompson" wrote:
Hi,
I have a workbook that contains several sheets, in the current setup I have
the [tab] value appearing in the header. What I would like is th value that
is currently in Cell reference "A2" to appear in the header too. To make
things more difficult (as I can do the referencing to cell A2) I would like
the value copied into the header as a paste value type entry, so that when I
delete column A later in the macro the header entry will remain.
Hope this makes sense!
--
K Hogwood-Thompson
|