Any ideas VBAXers, really keen to learn how to write this code better .