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
(E-Mail Removed)
"Dave Birley" <(E-Mail Removed)> wrote in message
news:B375A619-743E-4603-AB7A-(E-Mail Removed)...
>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