Macro for the same
'to autofilter based on non blank cells in column A
Range("A:A").Select
Selection.AutoFilter
Selection.AutoFilter Field:=1, Criteria1:="<>"
'to select and copy only visible cells in columns A and B
Columns("A:B").Select
Selection.SpecialCells(xlCellTypeVisible).Select
Selection.Copy
'to paste in sheet2
Worksheets("Sheet2").Select
Range("A1").Select
ActiveSheet.Paste
Regards,
Tariq Kamal
www.gate2quality.com
On Mon, Feb 2, 2009 at 11:43 AM, Naveen <naveenkumarmn...@yahoo.com> wrote:
> Hi,
>
> U can use the DATA-->FILTER-->Custom-nonblanks, u will get the data.
> (with out macro)
>
>
>
>
>
> *Regards*
> *Naveen Kumar M N*
> * *
> Email :naveenkumarmn...@yahoo.com
> *Best Wishes-Karunaada Kuvara*
>
> --- On *Sun, 2/1/09, Debasish Sahu <debasis...@gmail.com>* wrote:
>
> From: Debasish Sahu <debasis...@gmail.com>
> Subject: $$Excel-Macros$$ Selective copy of non bank cell
> To: excel-macros@googlegroups.com
> Date: Sunday, February 1, 2009, 9:38 AM
>
> Hi I hv a xl sheet whre i want to copy one of the column which contains
> both blank & non blank cells). but I want copying only non blank cells(cells
> having data) from that column. Could somebody help me in writing a macro for
> this.
>
> Regards
>
> Debasish Sahu
> Assistant Manager - Geology
> ACC Ltd.
> Thane - 400 604
> India
>
>
>
> >
>
--
http://www.gate2quality.com
http://www.rideahead.blogspot.com
--~--~---------~--~----~------------~-------~--~----~
Visit the blog to download Excel tutorials at
http://www.excel-macros.blogspot.com
To post to this group, send email to excel-macros@googlegroups.com
For more options, visit this group at
http://groups.google.com/group/excel-macros?hl=en
Visit & Join Our Orkut Community at
http://www.orkut.com/Community.aspx?cmm=22913620
To Learn VBA Macros Please visit http://www.vbamacros.blogspot.com
To see the Daily Excel Tips, Go to:
http://exceldailytip.blogspot.com
If you find any spam message in the group, please send an email to Ayush @
jainayus...@gmail.com
-~----------~----~----~----~------~----~------~--~---
