Hallo ihr Profis,
ich habe mir ein Makro aufgezeichnet und habe jetzt ein kleines Problem!
Wenn die Abfrage kommt "Suchen nach / Ersetzen durch" bleibt es jedesmal hängen wenn ein Suchwert nicht gefunden wird. (siehe Code)
Selection.Find(What:="Fertig*", After:=ActiveCell, LookIn:=xlFormulas, _
LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:=False).Activate
Selection.Replace What:="Fertig*", Replacement:="Fertigungsstunden", _
LookAt:=xlPart, SearchOrder:=xlByRows, MatchCase:=False
Selection.Find(What:="Kaufteil*", After:=ActiveCell, LookIn:=xlFormulas, _
LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:=False).Activate
Selection.Replace What:="Kaufteil*", Replacement:="Kaufteile", LookAt:= _
xlPart, SearchOrder:=xlByRows, MatchCase:=False
Selection.Find(What:="Maschinen*",.....
Meine Frage ist nun, kann man das Makro so verändern, das wenn z.B. die Eingabe "Kaufteil*" fehlt diese Abfrage einfach übersprungen wird.
Ich hoffe ich habe mich verständlich ausgedrückt?
Vielen Dank für eure Hilfe.
Gruß
Mikey