Automatische Verarbeitung in andere Tabellenblätter bestimmter Daten
#1
Star 
Hallo zusammen,

ich bekomme regelmäßig Rohdaten zu verschiedenen Produkten. Diese Daten soll nach dem Import automatisch in die passenden Tabelleblätter - je nach Einheit - verschoben werden.

[img]
Dateiupload bitte im Forum! So geht es: Klick mich!
]

So sieht das Ganze nach dem Import aus. Und so soll das Ergebnis aussehen:

[img]
Dateiupload bitte im Forum! So geht es: Klick mich!
]


Ziele:
1. Automatisches verschieben der Daten in das korrekte Tabellenblatt, in diesem Bsp "E42"

2. Bei Einfügen neuer Rohdaten sollen die vorhandenen Daten nicht überschrieben werden, neue Daten zuerst, bereits eingefügte verschieben sich nach unten

3. Das Einfügen soll in Spalte C beginnen, da die Ergebnis und Status Spalte händisch ausgefüllt werden soll.


Habe es mal mit einem Makro probiert, allerdings ist das Ergebnis jeweils fehlerhaft. Im Idealfall möchte ich das Problem über eine Formel lösen. Hat jemand eine Idee?

Vielen Dank für Tipps!
Top
#2
Hi,

hier mal ein Formelvorschlag mit einer Hilfsspalte auf dem jeweiligen Tabellenblatt. Die Hilfsspalte kannst du einfach ausblenden.

E42

ABCDEFGHI
1ErgebnisStatusDatumIDProduktKostenEinheitVerantwortlichHS
202.03.20161234511042Meier2
302.03.20161234713042Huber4
402.03.20161234915042Braun6
5
6
Formeln der Tabelle
ZelleFormel
C2=WENNFEHLER(INDEX(Tabelle1!A:A;I2);"")
D2=WENNFEHLER(INDEX(Tabelle1!B:B;I2);"")
E2=WENNFEHLER(SVERWEIS(D2;Tabelle1!B:F;2;0);"")
F2=WENNFEHLER(SVERWEIS(D2;Tabelle1!B:F;3;0);"")
G2=WENN(ZEILE(A1)>ZÄHLENWENN(Tabelle1!E:E;RECHTS(TEIL(ZELLE("dateiname";A1);FINDEN("]";ZELLE("dateiname";A1))+1;99);2)*1);"";RECHTS(TEIL(ZELLE("dateiname";A1);FINDEN("]";ZELLE("dateiname";A1))+1;99);2)*1)
H2=WENNFEHLER(SVERWEIS(F2;Tabelle1!D:H;3;0);"")
I2=VERGLEICH(G2;Tabelle1!E1:E20;0)
C3=WENNFEHLER(INDEX(Tabelle1!A:A;I3);"")
D3=WENNFEHLER(INDEX(Tabelle1!B:B;I3);"")
E3=WENNFEHLER(SVERWEIS(D3;Tabelle1!B:F;2;0);"")
F3=WENNFEHLER(SVERWEIS(D3;Tabelle1!B:F;3;0);"")
G3=WENN(ZEILE(A2)>ZÄHLENWENN(Tabelle1!E:E;RECHTS(TEIL(ZELLE("dateiname";A2);FINDEN("]";ZELLE("dateiname";A2))+1;99);2)*1);"";RECHTS(TEIL(ZELLE("dateiname";A2);FINDEN("]";ZELLE("dateiname";A2))+1;99);2)*1)
H3=WENNFEHLER(SVERWEIS(F3;Tabelle1!D:H;3;0);"")
I3=WENNFEHLER(WENN(ZEILE(A1)>ZÄHLENWENN(Tabelle1!$E$1:$E$20;G2);"";I2+VERGLEICH(42;INDEX(INDEX(Tabelle1!$E$1:$E$20;I2+1):Tabelle1!E$20;);0));"")

Excel Tabellen im Web darstellen >> Excel Jeanie HTML 4.8

Deine Tabellenblätter müssen nach diesem Vorschlag zwingend die Einheiten zweistellig beinhalten (E42, E44, usw.) Die Formeln kannst du beliebig weit nach unten ziehen, so dass sich das Blatt automatisch deiner Liste anpasst.
Gruß Günter
Jeder Fehler erscheint unglaublich dumm, wenn andere ihn begehen.
angebl. von Georg Christoph Lichtenberg (1742-1799)
Top


Gehe zu:


Benutzer, die gerade dieses Thema anschauen: 1 Gast/Gäste