Delete values if they appear consecutively in a column in Excel

Very simple macro... I have a series of cells in a column already selected. I want to delete all consecutive entries in this range. For example, I the range A1:a3 is populated with "Break,Break, Sheet" I want to delete the contents of cells a2. leaving "Break,{null},Sheet". If the series looked like this: break break break sheet sheet break sheet sheet break break the desired macro would process the selection and turn it into: break {null} {null} Sheet {null} break sheet {null} break {null} ## Deliverables macro code that I can paste in to my existing macro 3) All deliverables will be considered "work made for hire" under U.S. Copyright law. Buyer will receive exclusive and complete copyrights to all work purchased. (No GPL, GNU, 3rd party components, etc. unless all copyright ramifications are explained AND AGREED TO by the buyer on the site per the coder's Seller Legal Agreement). ## Platform Windows XP