Copying select areas

[aaronhowe]

I have a macro which copies out text from one sheet and places it into another. I only want the macro to select text when conditions are met (i.e. there is text to copy), but I wasn't able to do that so I just ended up copying an entire area (which is contigious).

Problem is, there are formulas being copied over (an if/isblank formula). Although when I paste into a new sheet I use Paste Special - values only - it carries over what would have been the result of the formula.

To illustrate, if box A1 istext, then box D1 gives me a date and box F1 adds 14 days to that date. If it's blank it shows nothing. When I paste, it carries 01/01/00 and 15/01/00 over respectively. Thus when I sort my sheet I end up with loads of blanks at the top of my list.

How do I program Visual Basic to identify completed cells and copy only those rows to my new sheet...?!

(Thanks for bearing with me!)

 

[Joe4]

I would approach it a little bit differently. You say that after you paste and sort it, all the blanks rows appear at the top. At that point I would run a macro to delete all those blank lines. Let's say you first line starts on line 1, and the date 01/01/00 appears in column D. Simply put the following loop in the macro:

Range("D1").Select
Do While ActiveCell.Value = 0
Selection.EntireRow.Delete
Loop

This should delete all those blank rows.

Hope this helps.

 

[aaronhowe]

I like the sound of that. Thanks for the help!!!