Hallo,
ich bin auf der Suche nach einem VBA Code der alle Zellen einer Spalte nach einem bestimmten Wort durchsucht und die vorangegangenen 7 Stellen dessen löscht. Die Zellinhalte sind alle unterschiedlich lang, haben völlig unterschiedliche Inhalte und das gesuchte Wort steht immer an unterschiedlichen Stellen und teils auch doppelt pro Zelle.

Beispielsweise
A1: aaaaaaa bbbbbb WORT cccccccccccccccccccccccccccccccc
A2: ddd eeeeee ffffff WORT ggg hhh iiiiii WORT

es soll werden
aaaaaaa cccccccccccccccccccccccccccccccc
ddd eeeeee ggg hhh

ergibt zu löschen
A1: bbbbbb WORT
A2: ffffff WORT
A2: iiiiii WORT
("WORT"+7 Stellen davor)

Vielen Dank vorab für eure Hilfe.