Discussion:
Zugehörige, identische Feldinhalte erkennen und separat ausgeben
(zu alt für eine Antwort)
michael r.
2006-10-20 10:36:47 UTC
Permalink
Hallo liebe NG,

ich habe folgendes Problem:
Ich habe eine Excel-Arbeitsmappe, in welcher in "Tabelle1" in Spalte A
verschiedene Waren, jedoch mit einheitlicher Bezeichnung sowie in
Spalte B die dazugehörigen Preise gelistet sind. Weiterhin habe ich in
"Tabelle2" auch Waren (in Spalte A) gelistet, die teilweise identisch
mit den Bezeichnungen von Tabelle1 sind. Genauso habe ich hier die
Spalte B mit dem Preis.
Nun möchte ich, dass hier die Preise - bei den Waren welche in
Tabelle2 doppelt vorkommen - automatisch ermittelt werden. Sprich also:
Falls in Tabelle1 das Teil "Nr.022" mit 5 € verzeichnet ist, und in
Tabelle2 auch das Teil "Nr.022" vorkommt, dass hier automatisch die 5
€ eingetragen werden.

Gibt's da eine Möglichkeit, bzw. ein VBA-Makro?

Danke bereits vorab.
MfG
Michael Rapoport
Claus Busch
2006-10-20 10:56:19 UTC
Permalink
Hallo Michael,
Post by michael r.
Ich habe eine Excel-Arbeitsmappe, in welcher in "Tabelle1" in Spalte A
verschiedene Waren, jedoch mit einheitlicher Bezeichnung sowie in
Spalte B die dazugehörigen Preise gelistet sind. Weiterhin habe ich in
"Tabelle2" auch Waren (in Spalte A) gelistet, die teilweise identisch
mit den Bezeichnungen von Tabelle1 sind. Genauso habe ich hier die
Spalte B mit dem Preis.
Nun möchte ich, dass hier die Preise - bei den Waren welche in
Falls in Tabelle1 das Teil "Nr.022" mit 5 € verzeichnet ist, und in
Tabelle2 auch das Teil "Nr.022" vorkommt, dass hier automatisch die 5
€ eingetragen werden.
Gibt's da eine Möglichkeit, bzw. ein VBA-Makro?
wenn deine Tabelle bis Zeile 1000 geht dann so, sonst Bereich anpassen
In B1 der Tabelle2
=WENN(ISTNV(SVERWEIS(A1;Tabelle1!A1:B1000;2;0));"";SVERWEIS(A1;Tabelle1!A1:B1000;2;0))
und herunter ziehen so weit gebraucht.
Ist ein Eintrag identisch, erhält er den Preis aus Tabelle1, sonst bleibt
der Preis leer.
Alternativ in B1 Tabelle2
=WENN(ZÄHLENWENN(Tabelle1!A:A;A1)>=1;SVERWEIS(A1;Tabelle1!$A$1:$B$1000;2;0);"")
--
Mit freundlichen Grüssen
Claus Busch

Win XP Prof SP2; Office 2000 SP3
claus_busch(at)t-online.de
michael r.
2006-10-23 06:56:51 UTC
Permalink
Hallo Zusammen,

besten Dank für die Tipps.
Es funktioniert nun einwandfrei.

Viele Grüße
Michael Rapoport

Alexander Wolff
2006-10-20 11:01:53 UTC
Permalink
Post by michael r.
Ich habe eine Excel-Arbeitsmappe, in welcher in "Tabelle1" in Spalte A
verschiedene Waren, jedoch mit einheitlicher Bezeichnung sowie in
Spalte B die dazugehörigen Preise gelistet sind. Weiterhin habe ich in
"Tabelle2" auch Waren (in Spalte A) gelistet, die teilweise identisch
mit den Bezeichnungen von Tabelle1 sind. Genauso habe ich hier die
Spalte B mit dem Preis.
Nun möchte ich, dass hier die Preise - bei den Waren welche in
Tabelle2 doppelt vorkommen - automatisch ermittelt werden. Sprich
also: Falls in Tabelle1 das Teil "Nr.022" mit 5 ? verzeichnet ist,
und in Tabelle2 auch das Teil "Nr.022" vorkommt, dass hier
automatisch die 5 ? eingetragen werden.
Das geht mit PreisInTabelle1= SVERWEIS(A2;Tabelle2Liste;2;0).

Ist der Artikel aus Tab1 nicht in Tab2, wird ein Fehler ausgegeben. Das ist
deswegen gut so, weil Du nun Tab2 aktualisieren (richtig!) oder den Preis in
Tab1 überschreiben (nicht empfehlenswert!) mussst.

Wenn allerdings in Tabelle2 Einträge doppelt sind, musst Du Dich für einen
davon entscheiden. Dafür sortierst Du sie und wirfst Duplikate raus.
--
Moin+Gruss Alexander - MVP für MS Excel - www.xxcl.de - mso2000sp3 --7-2
Loading...