Hallo,
ich suche in meiner Stückliste in Spalte D nach dem Satz: "ZUBEHOER: NICHT MITLIEFERN"
MIttlerweile wurde mir auch geholfen. Jetzt ist es aber so, dass unsere Stücklisten nicht immer gleich geschrieben werden.
Einmal steht da "Zubehör" klein geschrieben oder "Zubehoer" mir oe oder nur "Zubehör mitliefern"
Kann man die Suche zusammenfassen mit den unterschiedlichen Schreibweisen?
Hier der Code wie ich es im Moment habe
Range(Range("D2"), Range("D2").End(xlDown)).Select
For Each cell In Selection
If cell.Value Like "Zubehör*" Then Range(cell, cell.End(xlDown)).EntireRow.Delete
Next
Range(Range("D2"), Range("D2").End(xlDown)).Select
For Each cell In Selection
If cell.Value Like "ZUBEHÖR*" Then Range(cell, cell.End(xlDown)).EntireRow.Delete
Next
Range(Range("D2"), Range("D2").End(xlDown)).Select
For Each cell In Selection
If cell.Value Like "Zubehoer*" Then Range(cell, cell.End(xlDown)).EntireRow.Delete
Next
Range(Range("D2"), Range("D2").End(xlDown)).Select
For Each cell In Selection
If cell.Value Like "ZUBEHOER*" Then Range(cell, cell.End(xlDown)).EntireRow.Delete
Next