Postleitzahlen in Combobox

• Postleitzahlen in Combobox von Stefan vom 16.12.2006 13:32:25
• AW: Postleitzahlen in Combobox - von ransi am 16.12.2006 13:58:11
• AW: Postleitzahlen in Combobox - von ransi am 16.12.2006 14:03:07
  • AW: Postleitzahlen in Combobox - von Stefan am 16.12.2006 15:01:01
    • AW: Postleitzahlen in Combobox - von Daniel Eisert am 16.12.2006 15:41:16

Betrifft: Postleitzahlen in Combobox
von: Stefan

Geschrieben am: 16.12.2006 13:32:25
Hallo,
ich würde mir gern eine Annehmlichkeit schaffen und eine Combobox mit allen Postleitzahlen aus Deutschland "füttern", d. h. von 00001 bis 99999. Da Excel aber nur 65635 Zeilen hat, geht das so nicht.
Hat jemand eine Idee, wie man so was machen könnte??
Für Eure Hilfe schon mal besten Dank im voraus.
Gruß
Stefan

Betrifft: AW: Postleitzahlen in Combobox
von: ransi
Geschrieben am: 16.12.2006 13:58:11
HAllo Stefan
Schreib deine Postleitzahlen und Orte in eine Textdatei.
Über die List -Eigenschaft der Combobox füllst du sie dann mit den Daten aus der .txt.
ransi

Betrifft: AW: Postleitzahlen in Combobox
von: ransi

Geschrieben am: 16.12.2006 14:03:07
HAllo
Wenn du allerdingsnur die ZAhlen brauchst, gehts so am schnellsten:

Option Explicit
Public Sub test()
Dim arr(1 To 100000)
Dim L As Long
ComboBox1.Clear
For L = 1 To 100000
    arr(L) = Format(L, "00000")
Next
ComboBox1.List = arr
End Sub

     Code eingefügt mit Syntaxhighlighter 4.0

ransi

Betrifft: AW: Postleitzahlen in Combobox
von: Stefan
Geschrieben am: 16.12.2006 15:01:01
Hallo ransi,
genau das hab ich gesucht.
Funktioniert toll. Danke.
Gruß
Stefan

Betrifft: AW: Postleitzahlen in Combobox
von: Daniel Eisert

Geschrieben am: 16.12.2006 15:41:16
Hallo
mal ne frage, 100.000 Zeilen in ner combobox nur Zahlen ohne Hinweistext, vereinfacht das das Arbeiten wirklich?
falls du lieber mit der Maus als mit der Tastatur arbeitets, wärs da nicht einfacher, du baust mit ner Userform eine kleine Bildschirm-10er-Tastatur?
nur mal so als Idee,
Gruß, Daniel

Excel-Beispiele zum Thema "Postleitzahlen in Combobox"
Zellen mit Postleitzahlen separieren	ComboBox als Symbol
Alle ComboBoxes auf Position 1	Werte in eine ComboBox einer UserForm übernehmen
ComboBox in Abhängigkeit einer 2. ComboBox ein-/ausblenden	ComboBox mit Monatsnamen füllen
Mehrspaltige ComboBox	ComboBox2 in Abhängigkeit von ComboBox1 bestücken
Nur Zellen mit Inhalt in ComboBox listen	Neue UserForm bedingt nach ComboBox-Auswahl aufrufen