Thanks for all your input.

I have now managed to clear all the '0' cells (8000 of them) very quickly
which has saved me a lot of work.

Thanks again to all.