From: KennyD on
Hey ya'll,

Real quick one, hopefully. :) In the below code, if I wanted to paste the
values (shown), and then the formats and hyperlinks, what would I need to
add? Would I add '.Cells.PasteSpecial xlFormats' and
'.Cells.PasteSpecial xlHyperlinks'?

If sh.Visible = -1 Then
sh.Select
With sh.UsedRange
.Cells.Copy
.Cells.PasteSpecial xlPasteValues
.Cells.Select
End With
Application.CutCopyMode = False
End If
Range("A1").Activate
--
Nothing in life is ever easy - just get used to that fact.