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.

Kim, give something like this a try

Sub Macro1()
ActiveSheet.UsedRange.SpecialCells(xlCellTypeVisib le).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 **
"Kim" wrote in message
...
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.

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

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

--
Regards,
Tom Ogilvy

"Kim" wrote in message
...
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.