Thanks to both of you -- now I have the direct answer to my question, should
I ever need to use it in some other context, and your solution which is
application specific, and slicker 'n a pig in poop <g!
--
Dave
Temping with Staffmark
in Rock Hill, SC


"Don Guillett" wrote:



Why bother to waste time and effort by going there.

Sub copysh8colhformat()
Sheets("sheet6").Columns("H").Copy
Columns(ActiveCell.Column).PasteSpecial Paste:=xlPasteFormats
End Sub

--
Don Guillett
SalesAid Software

"Dave Birley" wrote in message
...
I want to run a Macro that starts in "the current" WS, briefly jumps to a
different WS (always the same one) Grabs the Format of a particular
Column,
and returns to do a Paste Special. I need to be able to capture the Name
of
the current WS into a Variable at the top of the Macro, so that I can
return
to the correct WS to continue.

Help, please!
--
Dave
Temping with Staffmark
in Rock Hill, SC