How to copy into next empty row using "for each cell in range" loop

**GIS2013** · 09-23-2013, 01:31 PM

Hi. I'm trying to first identify specific strings in a range, and then copy the entire row they belonged to into the first empty row in another sheet. I'm using loop because I need the macro to accumulate all relevant rows. In the sample file keyword is "div", but in d_t sheet only the last relevant row is being copied, while these two also should be copied.. any ideas?

Please Login or Register  to view this content.

**JOHN H. DAVIS** · 09-23-2013, 02:12 PM

Made a few changes.

Please Login or Register  to view this content.

First observation is my_rng was set to start at C2, whereas your data started at C1.

**GIS2013** · 09-23-2013, 02:17 PM

Cheers John! Could you please say a word about END's arguments in my case? END(3)(2)..

**JOHN H. DAVIS** · 09-23-2013, 02:30 PM

You're welcome. The (3) is an xl Constant I use in place of (xlup). The (2) is another way to offset a cell - translation .Offset(1).

How to copy into next empty row using "for each cell in range" loop

LinkBack

Thread Tools

Rate This Thread

Display

How to copy into next empty row using "for each cell in range" loop

Re: How to copy into next empty row using "for each cell in range" loop

Re: How to copy into next empty row using "for each cell in range" loop

Re: How to copy into next empty row using "for each cell in range" loop

Thread Information

Users Browsing this Thread

Similar Threads

[SOLVED] Loop to check for "yes" then copy the IDs with "yes" and paste to other workbook

coping a range into the next available empty cell in column "A"

transpose loop with "empty cell" condition

Why does =countif(range,"<>""") count empty cells?

Do Loop until empty row (column "A")

Bookmarks

Bookmarks

Posting Permissions