Office: (Office 2010) VBA Zeile kopieren, wenn Zellenwert in Liste vorhanden..

Hi Leutz,

ich habe da mal wieder ein Problem und ich hoffe Ihr habt eine Lösung für mich. Habe zwar schon im Forum gestöbert, habe aber nichts entsprechendes gefunden (oder war mit Blindheit geschlagen, was nicht auszuschliessen ist).
Folgendes Problem:
Ich habe im Tabellenblatt "Aufwandsliste" in den Spalten A bis C, in den Zeilen 2 bis 1001 Werte vorliegen.
Die jeweiligen Zeilen sollen in Tabellenblatt "K" kopiert werden,
wenn in Spalte A ein Wert steht, der in Tabellenblatt "ID-MA" in der Spalte D, Zeile 3 bis 9, enthalten ist.

Da ich mich mit VBA überhaupt nicht auskenne, brauche ich Eure Hilfe.

Vielen Dank im Vorraus,
Merkon

:)

 

Hallo Merkon,

...würde ich eine VBA-Lösung auch nicht empfehlen (wer soll Dir den Code denn warten, wenn sich mal was ändert?).

Mach Dir eine Hilfsspalte, in der Du per Formel prüfst
(Sinngemäß =Zählenwenn(='ID-MA'!$D$3:$D$9; WertAusSpalteA) > 0)
und wende auf diese Spalte einen Autofilter an.

Grüße
EarlFred

 

Naja, den Code warten ist nicht so sehr das Problem, da ich die Suchkriterien im Code erkennen kann.
Das ist als Excel-Vorlage gedacht: Einmal Werte einfügen, dann rechnet die Tabelle selber. So brauche ich meinen Kollegen weniger erklären und die können weniger falsch machen *Smilie
Wenn ich sage: erst einfügen, dann sortieren, dann Filter anwenden... gehe ich von einer Fehlerquote von mehr als 10 % aus.

 

Außerdem hilft "Zählenwenn" nicht, da ich keine Zahlen in den Zellen stehen habe, sondern Text.

 

Hallo Merkon, Code:

Beispielmappe anbei.

 

Hallo,

Hasso, vielen Dank für Deine Mühe, nur habe ich ein Problem dies auf meine Vorlage zu adaptieren, vor allem da sich die Vorgaben mal wieder geändert haben....

Daher habe ich meine Vorlage mal "anonymisiert" hier hochgeladen.
Denn nun darf ich nicht nur nach "K" aufteilen, sondern es kommen noch "GE, HH und RN dazu).
Es gibt im Blatt ID-MA je nach K (Spalte D), GE (Spalte E), HH (Spalte F) und RN (Spalte G) (alle Zeilen 3 bis 15) je eine Liste mit Datentypen, nach denen gesucht wird und die jeweils auf ein Tabellenblatt kopiert werden müssen.
Die "Datenaufbereitung" habe ich mir schon gebastelt und die funktioniert auch. Das Ergebnis dieser Datenaufbereitung wird im Blatt "Aufwandsliste" zusammengefasst dargestellt. Nur die in der Aufwandsliste zusammengefassten Daten je nach Wert in Spalte C in die Blätter K, GE etc. zeilenweise zu kopieren, dass würde ich gern mittels VBA durchführen.

Vielen Dank und Viele Grüße
Merkon