Office: Zellen vergleichen Unikat entfernen

Hallo,

Wollte mal fragen ob mir hier noch einer bei einem weiteren Problem helfen kann und zwar:

Hab 2 Spalten die Excel vergleichen muss wenn die Eingaben die in der Spalte B steh'n NICHT in Spalte A vorkommt soll Excel mir die Eingaben in Spalten B;C und D entfernen und die Zellen nach oben verschieben wenn möglich!

Hier ein Beispiel:

..........Spalte A....Spalte B.......Spalte C.......Spalte D .................
Zeile 1 Eingabe1 Eingabe1
Zeile 2 Eingabe2 Eingabe2
Zeile 3 Eingabe3 Eingabe3
Zeile 4 Eingabe4 Eingabe4
Zeile 5 Eingabe5 Eingabe6
.
.
.
.
u.s.w.........

So soll Excel jetzt die Eingabe6 in B5 automatisch mit den Eingaben in C5 und D5 entfernen und die Zeilen in Spale B C D nach oben verschieben.

Vielen Dank!

 

Hi,

Code:

Sub ZellenLoeschen()
    Dim lngZeile As Long
    For lngZeile = 1 To 8 '<== Zeile 1 bis 8
        If Cells(lngZeile, 1) <> Cells(lngZeile, 2) Then Range(Cells(lngZeile, 2), _
            Cells(lngZeile, 4)).Delete Shift:=xlUp
    Next lngZeile
End Sub

Deine erste und letzte Zeile musst du entsprechend anpassen.

Bis später,
Karin

 

Eine FOR..NEXT Schleife, in der Zeilen gelöscht werden? *kopfschüttel*

Gruß, Michael

 

Wer lesen kann ist klar im Vorteil: hier werden keine Zeilen sondern ZELLEN gelöscht.

Bis später,
Karin

 

Es geht mir eigentlich darum auf dem Bild 1 sehen Sie die Datenbank der Nachnamen und Vornamen auf Bild 2 sehen Sie die 2 Tabelle und in Spalte B hab ich ab B6 in den Zellen Felder mit Auswahllisten.

Jetzt folgendes Problem wenn ich einen Namen in der Tabelle auf (siehe Bild1) entferne so muss Excel mir auch den Namen in der zweiten Tabelle (siehe Bild2) Spalte B entfernen und die Felder A&B&C&D nach oben löschen

In der Auswahlliste wird der Name nicht mehr angezeigt doch wenn er ausgewählt ist und man entfernt den Namen auf der ersten Tabelle (Bild1) dann bleibt er stehen!




Bild1:


Bild2:

 

Hi,

mit Bildern kann Excel leider nichts anfangen - eine hochgeladene Arbeitsmappe ist die Grundlage, wenn man zielgerichtet helfen will.

Bis später,
Karin

 

Halllooo weis auch dass Excel nichts mit Bildern anfangen kann so blöd bin ich auch nicht es war nur um zu zeigen was ich eigentlich richtig haben will! Und ich kann die Tabelle nicht hochladen weil das hochladen bei 100kb. begrenzt ist und meine Tabelle aber darüber liegt!

 

Hi,

die Zeit für das Erstellen der Arbeitsmappe hast du doch bereits investiert - weshalb sollte man das als Helfer nocheinmal machen müssen? Außerdem ist ein Nachbau nie identisch mit dem Original.
Man kann als Fragesteller eine Arbeitsmappe auch "verkleinern", indem man eine Kopie erstellt und dort nur die für das Problem relevanten Daten belässt bzw. mit weniger Daten bereitstellt als das Original.
Aber - wie du meinst. Ich bin dann raus.

Bis später,
Karin

 

Moinsens!

Hm, ok, das ganze ist etwas tricky, da, soweit ich das verstehe, in Blatt 2 der Name aus 2 Spalten von Blatt 1 zusammengesetzt ist. Ein direkter Vergleich ist somit nicht mehr gegeben - man muß erst das nachbilden, was die Auswahl-Liste auch macht.

Ein "brutaler" Ansatz wäre, das "Änderung"-Ereignis per VBA abzugreifen und dann die Liste der ausgewählten Namen mit der Liste der verfügbaren Namen zu vergleichen. Das Unschöne dabei: Das Ereignis wird bei wirklich _jeder_ Änderung irgendwo auf den Blättern ausgelöst und bremst dadurch den workflow insgesamt ziemlich aus. Auch das "Neuberechnen"-Ereignis ist da leider nicht sehr viel besser. (Außerdem habe ich die Erfahrung gemacht, daß die "rückgängig"-Funktion durch Abarbeiten des "Änderung"-Ereignis ganz gerne mal deaktiviert wird.)

Alternativ könnte man noch einen "Check"-Button einbauen, der die Liste überprüft, statt es dauerhaft per Ereignis im Hintergrund machen zu lassen.

Ein etwas humanerer Ansatz wäre vielleicht, das ganze halbautomatisch zu machen: Über eine bedingte Formatierung kannst Du schauen, ob die Namen (Blatt 2) noch in Blatt 1 vertreten sind (irgendwas über zählenwenn() oder so) und bei "nein" dann die Zelle entsprechend rot einfärben. Dann hast Du den optischen Hinweis und kannst selbst regulierend eingreifen.

Müßtest Du erst mal schauen, welche grundlegende Vorgehensweise passend wäre...

Gruß, Michael

PS: Ich gehe mal davon aus, daß die Prüfung über die Spalte "Gesamt Name" erfolgen kann / muß und sich die Auswahl-Liste auch von dort bedient. Aber das müßtest du sicher stellen.