Hallo,
ich habe eine Tabelle mit Postleitzahlen nebst dazugehörigen Ortsnamen.
Nun ist es so dass in der Tabelle diverse PLZ mehrfach vorkommen da es zu diesen verschiedene Ortsnamen gibt.
Ich möchte nun nach Eingabe einer PLZ als Suchkriterium in einem weiteren Feld (Listen-/Kombinationsfeld?) alle möglichen Ortsnamen zur Auswahl angeboten bekommen.
Wie ist so etwas zu realisieren?
Habe mit Listen- und Kombinationsfeldern null Erfahrung.
Es grüsst der
Andy
Ich möchte nun nach Eingabe einer PLZ als Suchkriterium in
einem weiteren Feld (Listen-/Kombinationsfeld?) alle möglichen
Ortsnamen zur Auswahl angeboten bekommen.
Habe mit Listen- und Kombinationsfeldern null Erfahrung.
Hi Andy,
markiere in Tabelle1 A2, Daten–Gültigkeit–Liste
=Einzeln
das Gleiche für A2
=OrtEinzeln
Tabelle1 sieht dann z.B. so aus:
│ A │ B │
──┼──────┼─────┤
1 │ PLZ │ Ort │
──┼──────┼─────┤
2 │ 4711 │ BB │
──┴──────┴─────┘
Tabellenblatt 2 muß dann z.B. so aussehen Namen vergibt man über Einfügen–namen–…
Tabellenblatt: [DynamischeAuswahllisteOhneVBA2.xls]!Tabelle2
│ A │ B │ C │ D │ E │ F │ G │ H │
───┼───────┼─────┼─────────────┼───────┼───────┼──────────────┼───────┼───────┤
1 │ PLZ │ Ort │ PLZ Einzeln │ Hilf1 │ Hilf2 │ Orte Einzeln │ Hilf3 │ Hilf4 │
───┼───────┼─────┼─────────────┼───────┼───────┼──────────────┼───────┼───────┤
2 │ 12345 │ A │ 12345 │ 1 │ 12345 │ AA │ │ │
───┼───────┼─────┼─────────────┼───────┼───────┼──────────────┼───────┼───────┤
3 │ 12345 │ B │ 4711 │ │ │ BB │ │ │
───┼───────┼─────┼─────────────┼───────┼───────┼──────────────┼───────┼───────┤
4 │ 12345 │ C │ 678 │ │ │ CC │ │ │
───┼───────┼─────┼─────────────┼───────┼───────┼──────────────┼───────┼───────┤
5 │ 12345 │ D │ │ │ │ DD │ │ │
───┼───────┼─────┼─────────────┼───────┼───────┼──────────────┼───────┼───────┤
6 │ 12345 │ E │ │ │ │ EE │ │ │
───┼───────┼─────┼─────────────┼───────┼───────┼──────────────┼───────┼───────┤
7 │ 4711 │ AA │ │ 2 │ 4711 │ │ 1 │ AA │
───┼───────┼─────┼─────────────┼───────┼───────┼──────────────┼───────┼───────┤
8 │ 4711 │ BB │ │ │ │ │ 2 │ BB │
───┼───────┼─────┼─────────────┼───────┼───────┼──────────────┼───────┼───────┤
9 │ 4711 │ CC │ │ │ │ │ 3 │ CC │
───┼───────┼─────┼─────────────┼───────┼───────┼──────────────┼───────┼───────┤
10 │ 4711 │ DD │ │ │ │ │ 4 │ DD │
───┼───────┼─────┼─────────────┼───────┼───────┼──────────────┼───────┼───────┤
11 │ 4711 │ EE │ │ │ │ │ 5 │ EE │
───┼───────┼─────┼─────────────┼───────┼───────┼──────────────┼───────┼───────┤
12 │ 678 │ AAA │ │ 3 │ 678 │ │ │ │
───┼───────┼─────┼─────────────┼───────┼───────┼──────────────┼───────┼───────┤
13 │ 678 │ BBB │ │ │ │ │ │ │
───┼───────┼─────┼─────────────┼───────┼───────┼──────────────┼───────┼───────┤
14 │ 678 │ CCC │ │ │ │ │ │ │
───┴───────┴─────┴─────────────┴───────┴───────┴──────────────┴───────┴───────┘
Benutzte Formeln:
C2 : =WENN(ISTFEHLER(KKLEINSTE(D:smiley:;ZEILE()-1));"";SVERWEIS(KKLEINSTE(D:smiley:;ZEILE()-1);D:E;2;0))
C3 : =WENN(ISTFEHLER(KKLEINSTE(D:smiley:;ZEILE()-1));"";SVERWEIS(KKLEINSTE(D:smiley:;ZEILE()-1);D:E;2;0))
C4 : =WENN(ISTFEHLER(KKLEINSTE(D:smiley:;ZEILE()-1));"";SVERWEIS(KKLEINSTE(D:smiley:;ZEILE()-1);D:E;2;0))
C5 : =WENN(ISTFEHLER(KKLEINSTE(D:smiley:;ZEILE()-1));"";SVERWEIS(KKLEINSTE(D:smiley:;ZEILE()-1);D:E;2;0))
C6 : =WENN(ISTFEHLER(KKLEINSTE(D:smiley:;ZEILE()-1));"";SVERWEIS(KKLEINSTE(D:smiley:;ZEILE()-1);D:E;2;0))
C7 : =WENN(ISTFEHLER(KKLEINSTE(D:smiley:;ZEILE()-1));"";SVERWEIS(KKLEINSTE(D:smiley:;ZEILE()-1);D:E;2;0))
C8 : =WENN(ISTFEHLER(KKLEINSTE(D:smiley:;ZEILE()-1));"";SVERWEIS(KKLEINSTE(D:smiley:;ZEILE()-1);D:E;2;0))
C9 : =WENN(ISTFEHLER(KKLEINSTE(D:smiley:;ZEILE()-1));"";SVERWEIS(KKLEINSTE(D:smiley:;ZEILE()-1);D:E;2;0))
C10: =WENN(ISTFEHLER(KKLEINSTE(D:smiley:;ZEILE()-1));"";SVERWEIS(KKLEINSTE(D:smiley:;ZEILE()-1);D:E;2;0))
C11: =WENN(ISTFEHLER(KKLEINSTE(D:smiley:;ZEILE()-1));"";SVERWEIS(KKLEINSTE(D:smiley:;ZEILE()-1);D:E;2;0))
C12: =WENN(ISTFEHLER(KKLEINSTE(D:smiley:;ZEILE()-1));"";SVERWEIS(KKLEINSTE(D:smiley:;ZEILE()-1);D:E;2;0))
C13: =WENN(ISTFEHLER(KKLEINSTE(D:smiley:;ZEILE()-1));"";SVERWEIS(KKLEINSTE(D:smiley:;ZEILE()-1);D:E;2;0))
C14: =WENN(ISTFEHLER(KKLEINSTE(D:smiley:;ZEILE()-1));"";SVERWEIS(KKLEINSTE(D:smiley:;ZEILE()-1);D:E;2;0))
D2 : =WENN(E2="";"";ZÄHLENWENN($F$1:F1;"\>0")+1)
D3 : =WENN(E3="";"";ZÄHLENWENN($D$1:smiley:2;"\>0")+1)
D4 : =WENN(E4="";"";ZÄHLENWENN($D$1:smiley:3;"\>0")+1)
D5 : =WENN(E5="";"";ZÄHLENWENN($D$1:smiley:4;"\>0")+1)
D6 : =WENN(E6="";"";ZÄHLENWENN($D$1:smiley:5;"\>0")+1)
D7 : =WENN(E7="";"";ZÄHLENWENN($D$1:smiley:6;"\>0")+1)
D8 : =WENN(E8="";"";ZÄHLENWENN($D$1:smiley:7;"\>0")+1)
D9 : =WENN(E9="";"";ZÄHLENWENN($D$1:smiley:8;"\>0")+1)
D10: =WENN(E10="";"";ZÄHLENWENN($D$1:smiley:9;"\>0")+1)
D11: =WENN(E11="";"";ZÄHLENWENN($D$1:smiley:10;"\>0")+1)
D12: =WENN(E12="";"";ZÄHLENWENN($D$1:smiley:11;"\>0")+1)
D13: =WENN(E13="";"";ZÄHLENWENN($D$1:smiley:12;"\>0")+1)
D14: =WENN(E14="";"";ZÄHLENWENN($D$1:smiley:13;"\>0")+1)
E2 : =WENN(ZÄHLENWENN($A$1:A2;A2)=1;A2;"")
E3 : =WENN(ZÄHLENWENN($A$1:A3;A3)=1;A3;"")
E4 : =WENN(ZÄHLENWENN($A$1:A4;A4)=1;A4;"")
E5 : =WENN(ZÄHLENWENN($A$1:A5;A5)=1;A5;"")
E6 : =WENN(ZÄHLENWENN($A$1:A6;A6)=1;A6;"")
E7 : =WENN(ZÄHLENWENN($A$1:A7;A7)=1;A7;"")
E8 : =WENN(ZÄHLENWENN($A$1:A8;A8)=1;A8;"")
E9 : =WENN(ZÄHLENWENN($A$1:A9;A9)=1;A9;"")
E10: =WENN(ZÄHLENWENN($A$1:A10;A10)=1;A10;"")
E11: =WENN(ZÄHLENWENN($A$1:A11;A11)=1;A11;"")
E12: =WENN(ZÄHLENWENN($A$1:A12;A12)=1;A12;"")
E13: =WENN(ZÄHLENWENN($A$1:A13;A13)=1;A13;"")
E14: =WENN(ZÄHLENWENN($A$1:A14;A14)=1;A14;"")
F2 : =WENN(ISTFEHLER(KKLEINSTE(G:G;ZEILE()-1));"";SVERWEIS(KKLEINSTE(G:G;ZEILE()-1);G:H;2;0))
F3 : =WENN(ISTFEHLER(KKLEINSTE(G:G;ZEILE()-1));"";SVERWEIS(KKLEINSTE(G:G;ZEILE()-1);G:H;2;0))
F4 : =WENN(ISTFEHLER(KKLEINSTE(G:G;ZEILE()-1));"";SVERWEIS(KKLEINSTE(G:G;ZEILE()-1);G:H;2;0))
F5 : =WENN(ISTFEHLER(KKLEINSTE(G:G;ZEILE()-1));"";SVERWEIS(KKLEINSTE(G:G;ZEILE()-1);G:H;2;0))
F6 : =WENN(ISTFEHLER(KKLEINSTE(G:G;ZEILE()-1));"";SVERWEIS(KKLEINSTE(G:G;ZEILE()-1);G:H;2;0))
F7 : =WENN(ISTFEHLER(KKLEINSTE(G:G;ZEILE()-1));"";SVERWEIS(KKLEINSTE(G:G;ZEILE()-1);G:H;2;0))
F8 : =WENN(ISTFEHLER(KKLEINSTE(G:G;ZEILE()-1));"";SVERWEIS(KKLEINSTE(G:G;ZEILE()-1);G:H;2;0))
F9 : =WENN(ISTFEHLER(KKLEINSTE(G:G;ZEILE()-1));"";SVERWEIS(KKLEINSTE(G:G;ZEILE()-1);G:H;2;0))
F10: =WENN(ISTFEHLER(KKLEINSTE(G:G;ZEILE()-1));"";SVERWEIS(KKLEINSTE(G:G;ZEILE()-1);G:H;2;0))
F11: =WENN(ISTFEHLER(KKLEINSTE(G:G;ZEILE()-1));"";SVERWEIS(KKLEINSTE(G:G;ZEILE()-1);G:H;2;0))
F12: =WENN(ISTFEHLER(KKLEINSTE(G:G;ZEILE()-1));"";SVERWEIS(KKLEINSTE(G:G;ZEILE()-1);G:H;2;0))
F13: =WENN(ISTFEHLER(KKLEINSTE(G:G;ZEILE()-1));"";SVERWEIS(KKLEINSTE(G:G;ZEILE()-1);G:H;2;0))
F14: =WENN(ISTFEHLER(KKLEINSTE(G:G;ZEILE()-1));"";SVERWEIS(KKLEINSTE(G:G;ZEILE()-1);G:H;2;0))
G2 : =WENN(H2="";"";ZÄHLENWENN($G$1:G1;"\>0")+1)
G3 : =WENN(H3="";"";ZÄHLENWENN($G$1:G2;"\>0")+1)
G4 : =WENN(H4="";"";ZÄHLENWENN($G$1:G3;"\>0")+1)
G5 : =WENN(H5="";"";ZÄHLENWENN($G$1:G4;"\>0")+1)
G6 : =WENN(H6="";"";ZÄHLENWENN($G$1:G5;"\>0")+1)
G7 : =WENN(H7="";"";ZÄHLENWENN($G$1:G6;"\>0")+1)
G8 : =WENN(H8="";"";ZÄHLENWENN($G$1:G7;"\>0")+1)
G9 : =WENN(H9="";"";ZÄHLENWENN($G$1:G8;"\>0")+1)
G10: =WENN(H10="";"";ZÄHLENWENN($G$1:G9;"\>0")+1)
G11: =WENN(H11="";"";ZÄHLENWENN($G$1:G10;"\>0")+1)
G12: =WENN(H12="";"";ZÄHLENWENN($G$1:G11;"\>0")+1)
G13: =WENN(H13="";"";ZÄHLENWENN($G$1:G12;"\>0")+1)
G14: =WENN(H14="";"";ZÄHLENWENN($G$1:G13;"\>0")+1)
H2 : =WENN(Tabelle1!$A$2=A2;B2;"")
H3 : =WENN(Tabelle1!$A$2=A3;B3;"")
H4 : =WENN(Tabelle1!$A$2=A4;B4;"")
H5 : =WENN(Tabelle1!$A$2=A5;B5;"")
H6 : =WENN(Tabelle1!$A$2=A6;B6;"")
H7 : =WENN(Tabelle1!$A$2=A7;B7;"")
H8 : =WENN(Tabelle1!$A$2=A8;B8;"")
H9 : =WENN(Tabelle1!$A$2=A9;B9;"")
H10: =WENN(Tabelle1!$A$2=A10;B10;"")
H11: =WENN(Tabelle1!$A$2=A11;B11;"")
H12: =WENN(Tabelle1!$A$2=A12;B12;"")
H13: =WENN(Tabelle1!$A$2=A13;B13;"")
H14: =WENN(Tabelle1!$A$2=A14;B14;"")
Festgelegte Namen:
Einzeln : =BEREICH.VERSCHIEBEN(Tabelle2!$C$2;;;ZÄHLENWENN(Tabelle2!$D:blush:D;"\>0")), unbenutzt in Selektion.
OrtEinzeln: =BEREICH.VERSCHIEBEN(Tabelle2!$F$2;;;ZÄHLENWENN(Tabelle2!$G:blush:G;"\>0")), unbenutzt in Selektion.
Zahlenformate der Zellen im gewählten Bereich:
A1:A14
haben das Zahlenformat: Text
B1:B14,C1:C14,D1:smiley:14,E1:E14,F1:F14,G1:G14,H1:H14
haben das Zahlenformat: Standard
Tabellendarstellung erreicht mit dem Code in FAQ:2363
Gruß
Reinhard
Hallo Reinhard,
erstmal vielen Dank für Deine Antwort und den Lösungsvorschlag.
Leider funktioniert es noch nicht. In Spalte F bis H tut sich ausser in der ersten Zeile nichts.
Mir ist die Funktionsweise noch nicht ganz klar.
Mir scheint auch dass Dir in einem dieser beiden Formeln ein Fehler unterlaufen ist. In D3 beziehst Du die Formel ja quasi auf sich selbst.
D2 : =WENN(E2="";"";ZÄHLENWENN($F$1:F1;">0")+1)
D3 : =WENN(E3="";"";ZÄHLENWENN($D$1:smiley:2;">0")+1)
Ich kann Dir gerne die Datei mailen.
Gruss
Andy
Hallo Andy,
Leider funktioniert es noch nicht. In Spalte F bis H tut sich
ausser in der ersten Zeile nichts.
ich hatte es getestet, da klappte es.
Mir ist die Funktionsweise noch nicht ganz klar.
Mir scheint auch dass Dir in einem dieser beiden Formeln ein
Fehler unterlaufen ist. In D3 beziehst Du die Formel ja quasi
auf sich selbst.D2 : =WENN(E2="";"";ZÄHLENWENN($F$1:F1;">0")+1)
D3 : =WENN(E3="";"";ZÄHLENWENN($D$1:smiley:2;">0")+1)
Nein, in D3 beziehe ich mich auf die Zellen obendrüber.
Ich kann Dir gerne die Datei mailen.
Besser ist FAQ:2861
Gruß
Reinhard
Hallo Reinhard,
Leider funktioniert es noch nicht. In Spalte F bis H tut sich
ausser in der ersten Zeile nichts.ich hatte es getestet, da klappte es.
Möglicherweise habe ich auch einen Fehler beim Übertragen gemacht, obwohl ich alles markiert und kopiert habe.
Mir ist die Funktionsweise noch nicht ganz klar.
Mir scheint auch dass Dir in einem dieser beiden Formeln ein
Fehler unterlaufen ist. In D3 beziehst Du die Formel ja quasi
auf sich selbst.D2 : =WENN(E2="";"";ZÄHLENWENN($F$1:F1;">0")+1)
D3 : =WENN(E3="";"";ZÄHLENWENN($D$1:smiley:2;">0")+1)Nein, in D3 beziehe ich mich auf die Zellen obendrüber.
Ja, aber in D2 zählst Du in der Spalte F und in D3, D4, D5, und folgenden zählst Du in Spalte D. Das verwirrt mich etwas.
Ich kann Dir gerne die Datei mailen.
Besser ist FAQ:2861
Okay, hier der Link.
http://rapidshare.com/files/184554886/Postleitzahlen…
Gruss
Andy
Hi Andy,
http://rapidshare.com/files/184554886/Postleitzahlen…
Möglicherweise habe ich auch einen Fehler beim Übertragen
gemacht, obwohl ich alles markiert und kopiert habe.
da habe ich nur kurz geschaut.
Deine Mappe hat 6,2 MB, nicht nur das Runterladen/Öffnen, auch jede kleine Änderung dauert durch die vielen Berechnungen mehrere Minuten auf meinem PC.
Ich habe sie mal verkleinert auf 1,1 MB.
D,h. es gibt keine Formeln mehr, Vba macht das alles.
Wenn du jetzt in B1 eine Plz auswählst und zu dieser gibt es nur einen Ort, so erscheint dieser sofort in B2.
Gibt es mehrere Orte zu dieser PLZ so erscheint in B2: „Bitte Ort wählen“.
Teste sie mal gründlich aus:
http://www.hostarea.de/server-01/Januar-ffb523ba6d.xls
Gruß
Reinhard