Removing cells based on adjacent blanks

[F6Hawk]

I have this sheet that I need to search down column C, find a blank, then clear cells A thru E. This must be done until there is no more data in cell A.

TIA!

[Bryan Hessey]

I have this sheet that I need to search down column C, find a blank, then clear cells A thru E. This must be done until there is no more data in cell A.

TIA!

Hi,

a macro something like

Please Login or Register  to view this content.

should do the trick.

hth
---

[F6Hawk]

Thanks Brian, this is close, I think. But can I change

Rows(iRow).EntireRow.Delete

to

Rows(iRow).Range(A-E).ClearContents
?

I don't want to delete the entire row, just clear cells A thru E to make it look cleaner.

Thanks a bunch!
Hawk

[mudraker]

Try this macro

Please Login or Register  to view this content.

[F6Hawk]

Mudraker,

This did nothing for a bit, then all of a sudden, all values in the Range(A:E) were cleared (not just rows that had blank cells in C). The logic makes sense to me, but something is amiss.

Thanks for the idea though!

[F6Hawk]

This seems to be working, I kind of used the logic of the two examples:

Please Login or Register  to view this content.

My question now is, can I somehow clear the contents on a range of cells, instead of doing 5 cells per row individually? I tried:

Range(iRow, 1, 5).ClearContents

But it did not work.

[Bryan Hessey]

Thanks Brian, this is close, I think. But can I change

Rows(iRow).EntireRow.Delete

to

Rows(iRow).Range(A-E).ClearContents
?

I don't want to delete the entire row, just clear cells A thru E to make it look cleaner.

Thanks a bunch!
Hawk

Hi,

Please Login or Register  to view this content.

should help

(sorry about the Delete Row)

---

[F6Hawk]

Bryan, you DA MAN!! Thank you, Sir, this does it nicely.

Thanks goes out to mudraker, as well, you guys are what make this forum so great!

[Bryan Hessey]

Bryan, you DA MAN!! Thank you, Sir, this does it nicely.

Thanks goes out to mudraker, as well, you guys are what make this forum so great!

good to see it worked for you. mudraker's idea is better, use the Find rather than loop through each row, but for simplicity I sometimes take the easy route.

Thanks for your response.
---