Mehrere Inhalte durchsuchen
23.07.2003 13:49:05
Joachim
ich hab hier nen Beispielscript für meine Aufgabe:
Sub KillTheDaughter()
Dim Bereich, zelle
Set Bereich = Range("Source!A1:Z20000")
For Each zelle In Bereich
If zelle.Value = "Daughter" Then
zelle.EntireRow.Delete Shift:=xlUp
End If
Next
End Sub
Ich möchte jetzt nicht nur die Zeilen in denen Daughter steht, sondern auch die Zeilen un denen "Son" steht, wie schreibe ich denn das noch dazu, ohne noch ein makro schreiben zu müssen.
Vielen Dank, schönen Gruß Joachim
Anzeige