Variable Liste ohne Doppel in Gültigkeitsdropdown

Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Benutzer

Hallo Erich
die zweite Formel machte mir etwas Probleme, sie auf meine Orig-Datei anzupassen, und auf die Weise bin ich auf etwas gestoßen, das mir bei der ersten Formel gar nicht aufgefallen war...
Meine Orig-Datei unterscheidet sich noch in einer Kleinigkeit: Sie hat eine Kopfzeile. Die Werte, um die es geht, beginnen also erst in Zeile 2. Mit der ersten Formel bearbeitet, "vergißt" die Hilfsspalte (und damit das Dropdown) den ersten Wert (also den in der zweiten Zeile). Das war mir nicht aufgefallen in meiner Euphorie, daß es wenigsgtens annähernd klappt.
Seltsamerweise ist das in der Beispieldatei noch anders: Ich hab da mal eine Zeile eingefügt, und dort vergißt die Hilfsspalte sogar gleich die ersten beiden Werte (meier und schulz).
https://www.herber.de/bbs/user/69312.xls
Ich habe - abgesehen von meinen ergfolgslosen Versuchen - keine Idee, wie man die Formeln auf die Verhältnisse mit Kopfzeile anpassen könnte. Theoretisch wäre es zwar möglich, auf die Kopfzeile zu verzichten. Aber es stehen in einigen Spalten Zahlen, die ziemlich unklar sind, wenn nicht oben drüber steht, was sie darstellen. Insofern wäre mir eine Lösung mit Kopfzeile schon sehr recht.
Hast du 'ne Idee?
Viele Grüße - Jörg

Hi Erich
alles klappt wie gewünscht - aaabäääär...
plötzlich ist alles in Excel grottenlangsam, wenn meine Orig-Datei geöffnet ist (25MB, ca 110 Blätter)
Statt der Formel
INDEX(H:H;KKLEINSTE(WENN(ZÄHLENWENN(BEREICH.VERSCHIEBEN(H$2;;;ZEILE($1:$100));H$2:H$101)=1;ZEILE($2:$101));ZEILE(A1)))
heißt es bei mir jetzt
INDEX(H:H;KKLEINSTE(WENN(ZÄHLENWENN(BEREICH.VERSCHIEBEN(H$2;;;ZEILE($1:$1000));H$2:H$1001)=1;ZEILE($2:$1001));ZEILE(A1)))
(also nur ein größerer Listenumfang) und das in drei Spalten.
Ich hab mal die Formeln in die Beisp-Datei gepackt (für eine Spalte). Auch den Bereichsnamen hab ich im Umfang angepaßt.
https://www.herber.de/bbs/user/69342.xls
Wenn du in dieser Datei was änderst, läuft alles normal. Wenn aber auch die Orig-Datei (mit gleichfalls diesen Formeln) geöffnet ist, benötigt auch in dieser Beisp-Datei jede Änderung 1-2 min.
Was ist in diesen Formeln bloß verborgen, das Excel dermaßen lahmgelegt wird...?
VG Jörg

With Range("P2").Resize(oDic.Count) .Cells.Resize(oDic.Count) = Application.Transpose(oDic.keys) .Sort Key1:=.Cells(1, 1), Order1:=xlAscending, Header:=xlNo .EntireColumn.Font.ColorIndex = 15 End With

If MaxRow > 2 Then With Range("P2").Resize(oDic.Count) .Cells = Application.Transpose(oDic.keys) .Sort Key1:=.Cells(1, 1), Order1:=xlAscending, Header:=xlNo .Cells.Font.ColorIndex = 15 'hier Farbe für Schrift End With Else Range("P2") = Cells(2, 8) Range("P2").Font.ColorIndex = 15'hier Farbe für Schrift End If

Beliebteste Forumthreads (12 Monate)

Variable Liste ohne Doppel in Gültigkeitsdropdown

16
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

43 Forumthreads zu ähnlichen Themen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

Variable Liste ohne Doppel in Gültigkeitsdropdown

16 Beiträge zum Forumthread Beiträge zu diesem Forumthread

43 Forumthreads zu ähnlichen Themen

VBA Beispiele zu verwandten Themen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

16
Beiträge zum Forumthread

Beiträge zu diesem Forumthread