Hallo Gast96028,
super das man hier so schnell eine Antwort bekommt. Vielen Lieben Dank für deine Hilfe.
Leider funktioniert das irgendwie nicht richtig. Der Code überprüft zwar laut Ausgabe alle Zeilen fügt dann aber nur die erste Zeile ein.
Je nachdem wie viele Teilenummern ich in Tabellenblatt1 eingefügt habe, wird auch die Zeile dementsprechend häufig eingefügt.
Habe das Problem aber gerade lösen können. :)
Das andere Problem, bei dem ich aber leider nicht weiter komme, ist dass wenn eine Teilenummer (mit oder ohne abweichenden Preisen) schon vorhanden ist, dann folgender Fehler ausgegeben wird:
„Die Match-Eigenschaft des WorksheetFunktion-Objekts kann nicht zugeordnet werden.“
Beim Debuggen wird mir folgende Zeile aus obigem Code angezeigt.
zeile = Application.WorksheetFunction.Match(suche, zwei.Columns(1), 0)
Wäre nett wenn ich zu diesem Fehler noch kurz Hilfe bekommen könnte. :)
Liebe Grüße Steph :)
|