Office: Bräuchte Hilfe bei einer Umsetzung

Hallo zusammen

Ich möchte gerne eine Sache umsetzen und weiß leider nicht wie. In der Suche habe ich leider nichts gefunden was passt.

Ich habe 2 Tabellenblätter wo jeweils in der Spalte A eine Zahlenkombination steht. Nun möchte ich das die Tabellen Blätter immer wieder auf neue Zahlen abgeglichen werden und wenn zwei gleiche auftauchen beide Zahlen in beiden Blättern gelöscht werden.

Wie stelle ich das am besten an.

Vielen Dank an alle in voraus

:)

 

Hallo,

Das hängt auch davon ab, wo und wonach Du suchst.

Ich interpretiere das mal so: Du gibst in Sp A eine Zahl ein, dann soll diese Zahl in Sp A der anderen Tabelle gesucht werden; im Erfolgsfalle ist dann diese Zahl in beiden Tabellen zu löschen.
Wenn dem so ist, dann nutze für beider Tabellen das Change-Ereignis, und suche die eingegebene Zahl in der anderen Tabelle mit der Funktion Find oder Application.Match.

 

Ja genau das meine ich. Leider weiß ich nicht wie ich das schreibe weil ich von VBA nicht viel Ahnung habe.

Könntest du mir da helfen ?

 

Hallo,

du hast einen wahnsinnig intelligenten und innovativen Betreff gewählt. Jemand sucht Hilfe in einem Forum - wäre hätte das vermutet? Glaubst du, dass sich diesen Beitrag ein künftig Hilfesuchender jemals anschauen wird? Denk mal an deine eigenen Sucherfolge.

Anhand der spärlichen Informationen und ohne Beispielmappe kann ich dir nur den Rat geben, dich mit bedingter Formatierung auseinanderzusetzen. Damit kannst du dir die Werte, die in beiden Tabellen vorkommen, farbig anzeigen lassen.

 

Entschuldigung für die Formulierung das hast du natürlich recht.

Eine Farbliche Markierung reicht für mein Vorhaben leider nicht ich muss beide Werte entfernt bekommen

 

Doppelt vorhandene Werte kannst du mit dem Autofilter nach Farbe eingegrenzt anzeigen lassen und dann händisch in einem Rutsch löschen.

Für Automatismen braucht es tatsächlich VBA.

 

Hallo Tobi,

Das kann ich mir schon vorstellen!

Aber stell zunächst mal eine Beispieldatei zur Verfügung!

 

Hallo aloys78

Anbei einmal eine Testdatei wo ich zwei Tabellenblätter eingebaut habe mit zahlen.

Ich möchte das die beiden Blätter sich kontinuierlich abgleichen und wenn Dopplung da sind diese aus beiden gelöscht wird.

 

Hallo Tobi,

Das muss kein Widerspruch zu meiner Aussage in Beitrag #2 sein, die Du ja bestätigt hast.

Dazu mein Code-Vorschlag (Code im VBE unter "DieseArbeitsmappe" einfügen)
Code:

 

Hallo aloys78

Vielen Dank für den Code. wenn ich in den Code noch weitere Blätter abfragen möchte wie muss ich den Code dann ändern ?

Am ende habe ich ungefähr 27 Blätter die mit einem Blatt abgeglichen werden müssen.

Ich habe nochmal eine Datei mit angehangen wo aber nur 3 Blätter drin sind.

Vielen Dank.

 

Hallo Tobi,

bisher war es ja recht einfach: eine Eingabe in eines der beiden Tabellenblätter führte zu einem Abgleich mit dem anderen Blatt. Bei Paarigkeit wurden dann beide Werte gelöscht

Das hängt davon, was Du wann erreichen willst; das könntest Du mal nachvollziehbar beschreiben!

 

Halloo Aloys,

Ich habe dir eine PN geschrieben

Vielen Dank

 

Hallo Aloys,

hiermit gehe ich einmal auf deinen Hinweis ein und benötige einmal folgende Funktion.

Anbei habe ich einmal eine Beispieldatei Angehangen.

a) nach Eingabe einer Zahl in eine den Tabellen Kunde 1, Kunde 2, usw. Muss nichts abgeglichen werden.

b) nach Eingabe in Blatt Rückgabe, soll die eingegebene Zahl mit den Blättern Kunde 1, Kunde 2, usw. Abgeglichen werden sollte diese Zahl in einen der anderen Blättern vorkommen soll diese incl deser zahl in Rückgabe gelöscht werden.

 

Hallo Tobi,

mein Vorschlag im Anhang.

 

Hallo Aloys,

Vielen Dank das ist genau das was ich gesucht habe.

Top !!!!!