Hallo,

das hat auch vorher nicht funktioniert ;-), für Mehrfachsuche mußt Du die .Find-Methode mit der .FindNext-Methode und anschl. Loop koppeln..Guck mal in die Hilfe , allerdings ist die auch krass fehlerhaft (!): beim Loop mußt Du auf den Start-Address-String abfragen, nicht auf das Range-Objekt...M$ mal wieder, kommen mit ihrem eig. Prog.-Dialekt nich klar...

https://docs.microsoft.com/de-de/office/vba/api/excel.range.find

Gruß,