I post the relevant part of the code that i am adding to a current macro:
if columnA has value, but columnB does not have value (empty) or IsBlank, then clear columnAIf Not IsEmpty(i, "A") = "" And IsEmpty(i, "B") Then Cells(i, "A").ClearContents
starting from A8 to A49.
Bookmarks