Select Visible Cells only copy & Paste

K

Kim

Hi all,

I would like to create a macro that selects only cells containing
information from subtotalled worksheet,then copy visible cells only, and
paste them into another worksheet.

I have searched the existing Q&A's but can't find what I'm looking for.

Thanks in advance.
 
P

Paul B

Kim, give something like this a try

Sub Macro1()
ActiveSheet.UsedRange.SpecialCells(xlCellTypeVisible).Copy _
Destination:=Sheet2.Range("A1")
End Sub

--
Paul B
Always backup your data before trying something new
Please post any response to the newsgroups so others can benefit from it
Feedback on answers is always appreciated!
Using Excel 2000 & 97
** remove news from my email address to reply by email **
 
T

Tom Ogilvy

Range("C9").CurrentRegion.Columns(1). _
SpecialCells(xlVisible).entirerow.copy _

Worksheets(3).Range("A1").PasteSpecial xlValues
 
Top