Hallo,

ich möchte folgendes erreichen:
ich suche nach dem wort "planung" (dieses wort kommt in manchen tabellen 2mal vor in anderen aber auch z.b. 12mal). jetzt sollen immer 5 zeilen gelöscht werden. mir der unten angegebenen funktion funktioniert das ganze aber nur 1mal.
_________________________________________________
Cells.Find(What:="Planung", After:=ActiveCell, LookIn:=xlFormulas, _
LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:=False, SearchFormat:=False).Activate

Selection.EntireRow.Delete
Selection.EntireRow.Delete
Selection.EntireRow.Delete
Selection.EntireRow.Delete
Selection.EntireRow.Delete
_________________________________________________

vielen dank im voraus

gruß
tim

^{*Threadedit* 16:31:45, 20.02.2008
Admininfo: Führ bitte einen Thread nicht fort indem du Weitere eröffnest, und vermeide Mehrfachanfragen. Die Datenbank und User werden es dir danken. Siehe FAQ 2, #3.}