Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1440to1444
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

ungleiche Zeilen suchen per VBA

ungleiche Zeilen suchen per VBA
20.08.2015 11:06:44
Sylvie
Liebes Forum,
vielleicht kann mir jemand bei folgendem Problem helfen :
Wenn der Anwender die Arbeitsmappe speichern will, soll folgende Überprüfung stattfinden :
Von Zelle A6 bis M407 (oder solange es Werte in Spalte D gibt)
soll geprüft werden, ob Zeilen, deren Nummer in Spalte B gleich ist, auch die gleichen Werte in den Spalten D bis I und K bis M haben
Beispiel :
ABCDEFG
1234567
1234567
1355555
1234568 - falsch
Die betroffenen Zeilen sollen z.B. rot gekennzeichnet werden und der Anwender soll zur Korrektur aufgefordert werden.
Ich hoffe ich habe mich verständlich ausgedrückt.
Vielen Dank und Grüße
Sylvie

15
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: ungleiche Zeilen suchen per VBA
20.08.2015 13:15:56
Jack_d
Hallo Sylvie,
Ich glaub das lässt sich mit einer Mustermappe besser veranschaulichen.
Grüße

AW: ungleiche Zeilen suchen per VBA
20.08.2015 14:36:54
Jack_d
Hallo Sylvie,
wenn ich Lust hätte das abzutippen, wäre es ausreichend.
Da ich das leider nicht hab, wäre eine Excel Tabelle das Mittel der Wahl
Grüße

AW: ungleiche Zeilen suchen per VBA
20.08.2015 15:31:26
Sylvie
https://www.herber.de/bbs/user/99717.xlsm
Hallo Jack,
hier die Beispieldatei xlsm.
Gruß
Sylvie

Anzeige
AW: ungleiche Zeilen suchen per VBA
20.08.2015 15:41:03
Jack_d
Hallo Sylvie,
eine Frage noch
1. Wie wird der "Normzustand" definiert? (Wenn zb. der erste Eintrag [je Ziffer in Spalte D] falsch ist, wären in der Konsequenz alle anderen (eigentlich richtigen Ei9nträge) falsch
Grüße

AW: ungleiche Zeilen suchen per VBA
20.08.2015 16:24:41
Sylvie
Hallo Jack,
es handelt sich um Wiederholungszeilen, d.h.
wichtig ist der Wert in Spalte B, er definiert den Rest der Zeile. Nur die Zellen in Spalte C und J werden ignoriert, da sie andere Werte enthalten dürfen.
Also, ausgehend von Spalte B werden die Werte in Spalte D bis I und K bis M überprüft, ob sie gleich sind.
In Spalte D steht Text, sobald diese Zelle leer ist, ist das Ende der Tabelle erreicht.
Danke für deine Hilfe
Gruß
Sylvie

Anzeige
AW: ungleiche Zeilen suchen per VBA
21.08.2015 15:09:35
Sylvie
Hallo Jack,
keine Idee ?
Grüße und schönes WE
Sylvie

ungeeignete Datei
21.08.2015 16:51:41
Michael
Hi Sylvie,
mir würde da schon was einfallen, aber ich habe keine Lust, mich mit einer Datei herumzuschlagen, in der wo auch immer alles mögliche abgeschaltet ist (z.B. Berechnungen: gib in eine Zelle =1+2 ein, und das bleibt drin stehen, als ob die Zelle als Text formatiert wäre - was sie aber nicht ist) - und wo einfachste Sachen nicht gehen, weil irgendwelche Zellen verbunden sind.
Wenn Du das änderst kannst und willst, kann Dir geholfen werden.
Schöne Grüße,
Michael
Übrigens ist Deine Angabe nicht zielführend: In Spalte D steht Text, sobald diese Zelle leer ist, ist das Ende der Tabelle erreicht.
Die ist nämlich bereits in D12 leer, aber da ist die Tabelle noch lange nicht zu Ende.

Anzeige
AW: ungeeignete Datei
24.08.2015 13:15:24
Sylvie
Hallo Michael,
mir ist unklar, warum Berechnungen abgeschaltet sind. War keine Absicht.
Die tatsächliche Tabelle ist sehr kompliziert. Sie hat viele Formeln, verbundene Zellen, Arrayformeln etc.
Deshalb habe ich eine Beispieldatei erstellt, in der ersichtlich wird, welche Daten geprüft werden sollen.
Mit D12 hat du natürlich recht.
Grüße
Sylvie

AW: ungleiche Zeilen suchen per VBA
21.08.2015 16:59:27
Matthias
Hallo Sylvie,
ich hab leider heut nicht mehr die Zeit dazu, aber warum nutzt du nicht den wunderbaren SVerweis? (ohne VBA)
Dazu muss für jeden Wert der in B geschrieben werden kann erstmal eine kleine Tabelle angelegt werden (die ist hoffentlich richtig ausgefüllt, denn sie dient als Ausgangsbasis :P ).
Wenn du jetzt in B z.B. eine "2" reinschreibst, sucht der SVerweis diese in deiner Ausgangsbasis und gibt dir den Wert der hinterlegten Spalte zurück. In Spalten D-I und K-M steht dann die Formel des SVerweises. Damit kann sich zumindest nicht vertippt werden und die Zeile ist schneller ausgefüllt. Gegen mutwillige oder versehentliche Änderungen gibt es dann noch den selektiven Blattschutz.
Mit einem Change-Ereignis kann man für Schreibfaule sogar die Formeln automatisch aus der darüberliegenden Zeile in die aktive übertragen lassen.
Hoffe das hilft dir oder weiteren Helfers-Helfern als Denkanstoß,
lg Matthias

Anzeige
AW: offen
21.08.2015 17:01:08
Matthias
Entschuldige, ich stelle mal wieder auf offen.
lg Matthias

AW: ungleiche Zeilen suchen per VBA
24.08.2015 13:18:06
Sylvie
Hallo Matthias,
es handelt sich nur um eine Beispieldatei. Die tatsächlcihe Tabelle ist voller Formeln.
Die Lösung muss VBA sein, alles andere wäre für den Anwender zu kompliziert.
Grüße
Sylvie

AW: Lösungsvorschlag
24.08.2015 13:26:13
Sylvie
Hallo Michael,
vielen Dank.
Das sieht sehr gut aus. Das habe ich gesucht.
Ich versuche mal den Code in meiner Tabelle anzuwenden.
Ich melde mich dann nochmal.
Viele Grüße
Sylvie

Anzeige
ok, danke erst Mal für die Rückmeldung, owT
25.08.2015 19:34:52
Michael

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige