Selection.Find(What:="27", After:=ActiveCell, LookIn:=xlFormulas, LookAt:= _
xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:=False).Offset(0, 6).FormulaR1C1 = "CO2"
Im obigen Beispiel wird nach dem Wert "27" gesucht, wird dieser gefunden, kommt in ein Feld in der selben Zeile der Kommentar "CO2". Was kann ich tun, damit für den Fall, daß der Wert 27 nicht vorhanden ist, das Makro zur nächsten Zeile weitergeht anstatt sich mit einer Fehlermeldung zu beenden?