Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: PLZ Suchen und einfügen

PLZ Suchen und einfügen
11.04.2017 11:23:42
VBA
Hallo zusammen,
ich habe ein Excel Sheet in dem die PLZ zum Ort fehlen. ich möchte jetzt aus einem anderen Sheet das als plz liste fungiert die plz automatisch einfügen lassen, um mir 3h arbeit zu ersparen.
Sprich VBA soll den ort aus der liste mit fehlenden PLZ (steht in Spalte B) erkennen und dann in dem datenbank sheet die PLZ suchen und im ersten Sheet ergänzen.
Kann mir wer helfen?
Anzeige

10
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: PLZ Suchen und einfügen
11.04.2017 11:25:58
Anton2
Hallo,
kannst vielleicht eine Beispielmappe hochladen?
VG Anton
AW: PLZ Suchen und einfügen
11.04.2017 11:26:33
Bernd
Hi,
wenn Du ohnehin eine Tabelle mit beiden Daten hast, wozu dann nochmals dieselbe?
Ansonsten hört es sich für mich nach SVerweis an, also auch ohne VBA möglich.
Falls doch VBA, lasse ich mal auf offen.
MfG Bernd
Anzeige
AW: PLZ Suchen und einfügen
11.04.2017 11:34:11
VBA
Leider kann ich keine beispieldatei hochladen, da es sich um vertrauliche Daten handelt.
Ich habe eine Liste in der in Spalte A der Firmenname steht Spalte B ist leer und Spalte C steht der Ort.
In Spalte B soll die PLZ des Ortes in Spalte C eingefügt werden. Das zweite Sheet ist eine Liste aller Städte in Deutschland mit entsprechenden PLZ. Diese dient als Datenbank für die Suche. VBA soll also den Ort im ersten Sheet aus der Spalte auslesen, danach in der Datenbank suchen und die entsprechende PLZ im ersten Sheet eintragen.
Anzeige
AW: PLZ Suchen und einfügen
11.04.2017 11:35:56
Bernd
Hi,
man kann auch eine Beispielmappe mit anonymisierten Daten hochladen und dort eine exakte Abbildung der originaldatei nachstellen. Denn eine Mappe nachbauen, wird hier keiner für Dich.
MfG Bernd
AW: PLZ Suchen und einfügen
11.04.2017 11:37:10
Werner
Hallo,
dann ein Blatt mit ein paar Dummy-Daten, keiner braucht hier eine riesen Datei mit Klarnamen. Wichtiger ist sowieso das Blatt aus dem du deine Postleitzahlen ziehen willst.
Gruß Werner
Anzeige
AW: PLZ Suchen und einfügen
11.04.2017 11:43:40
SF
Hola,
=INDEX('POSTLEITZAHLEN DE'!$A$1:$A$17;VERGLEICH(C2;'POSTLEITZAHLEN DE'!$B$1:$B$17;0))

Gruß,
steve1da
Anzeige
AW: PLZ Suchen und einfügen
11.04.2017 11:47:26
VBA
Danke dir,
aber es handelt sich um 4000 Firmen und die Datenbank besteht aus 15000 Zeilen.
Daher würde ich das gerne VBA-seitig lösen.
AW: Probier mal
11.04.2017 13:20:06
hary
Moin
Teste mal ob die Geschwindigkeit passt. Es wird die Formel von Steve nur in leere Zellen eingetragen. Danach wird die Formel durch Wert ersetzt.
Dim Zelle As Range, Bereich As Range
Set Bereich = Worksheets("Kundenliste").Range("B1:B" & Cells(Rows.Count, 1).End(xlUp).Row)
If Application.CountBlank(Bereich) Then
For Each Zelle In Bereich.SpecialCells(xlCellTypeBlanks)
Zelle.FormulaR1C1 = "=INDEX('POSTLEITZAHLEN DE'!R1C1:R17C1,MATCH(RC[1],'POSTLEITZAHLEN DE'! _
R1C2:R17C2,0))"
Next
Bereich.Value = Bereich.Value
End If

gruss hary
Anzeige
AW: Beispieldatei
11.04.2017 11:26:43
Werner
Hallo,
dann lad doch bitte mal eine Beispieldatei hier hoch. Bei entsprechender Datenstruktur in deiner PLZ Liste ließe sich das z.B. mit einem SVerweis lösen.
Und noch ein kleiner Hinweis: Die Excel Version ist mitnichten ohne Relevanz
Gruß Werner
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige

Infobox / Tutorial

PLZ Suchen und Einfügen in Excel


Schritt-für-Schritt-Anleitung

  1. Daten vorbereiten: Stelle sicher, dass Du zwei Excel-Blätter hast. Eines enthält die Liste der Firmen mit leeren PLZ-Spalten (z.B. "Kundenliste"), das andere die Datenbank mit Städten und PLZ (z.B. "POSTLEITZAHLEN DE").

  2. VBA-Editor öffnen: Drücke ALT + F11, um den VBA-Editor zu öffnen.

  3. Modul hinzufügen: Klicke mit der rechten Maustaste auf "VBAProject (DeineDatei.xlsx)" und wähle "Einfügen" > "Modul".

  4. VBA-Code eingeben: Füge den folgenden Code in das Modul ein:

    Dim Zelle As Range, Bereich As Range
    Set Bereich = Worksheets("Kundenliste").Range("B1:B" & Cells(Rows.Count, 1).End(xlUp).Row)
    If Application.CountBlank(Bereich) Then
       For Each Zelle In Bereich.SpecialCells(xlCellTypeBlanks)
           Zelle.FormulaR1C1 = "=INDEX('POSTLEITZAHLEN DE'!R1C1:R17C1,MATCH(RC[1],'POSTLEITZAHLEN DE'!R1C2:R17C2,0))"
       Next
       Bereich.Value = Bereich.Value
    End If
  5. Makro ausführen: Schließe den VBA-Editor und führe das Makro aus, um die PLZ automatisch einzufügen.


Häufige Fehler und Lösungen

  • Fehler: PLZ wird nicht gefunden: Überprüfe, ob die Städtenamen in beiden Blättern genau übereinstimmen (z.B. keine zusätzlichen Leerzeichen).

  • Fehler: Excel stürzt ab: Stelle sicher, dass Du genügend RAM zur Verfügung hast, besonders bei großen Datenmengen.

  • Lösung: PLZ Datenbank anpassen: Achte darauf, dass die PLZ-Datenbank aktuell ist und alle Städte enthält, die Du benötigst.


Alternative Methoden

  • SVerweis verwenden: Du kannst auch die SVerweis-Funktion nutzen, um PLZ zu suchen. Die Formel könnte so aussehen:

    =SVERWEIS(C2; 'POSTLEITZAHLEN DE'!$B$1:$C$15000; 2; FALSCH)
  • INDEX und VERGLEICH: Eine weitere Möglichkeit ist die Kombination von INDEX und VERGLEICH, wie im Beispiel von Steve im Forum.


Praktische Beispiele

  • Wenn Du eine Liste von Firmen mit den Orten hast, kannst Du die PLZ automatisch ergänzen, indem Du die oben genannten Schritte ausführst.

  • Für die PLZ-Suche in Deutschland ist es hilfreich, eine PLZ Datenbank zu nutzen, die alle relevanten Städte und deren PLZ enthält.


Tipps für Profis

  • Nutzung von Dropdown-Listen: Erwäge, Dropdown-Listen für die Eingabe der Orte zu verwenden, um Tippfehler zu vermeiden und die PLZ-Suche zu optimieren.

  • Datenvalidierung: Implementiere Datenvalidierung, um sicherzustellen, dass nur gültige Ortsnamen eingegeben werden.

  • Excel Deutschlandkarte mit PLZ: Wenn Du geografische Daten visualisieren möchtest, kannst Du die Excel Deutschlandkarte verwenden, um PLZ-Regionen darzustellen.


FAQ: Häufige Fragen

1. Wie kann ich sicherstellen, dass die PLZ immer korrekt zugeordnet wird?
Verwende Daten aus einer zuverlässigen PLZ-Datenbank und stelle sicher, dass die Städtenamen in beiden Blättern übereinstimmen.

2. Ist VBA notwendig, oder kann ich das auch ohne Programmierung machen?
Es ist auch möglich, die PLZ über Formeln wie SVerweis oder INDEX/VERGLEICH zu finden. VBA ist jedoch hilfreicher bei großen Datensätzen.

3. Wo finde ich eine gute PLZ-Datenbank für Deutschland?
Du kannst Websites wie postleitzahlen.de besuchen, um eine kostenlose PLZ-Datenbank herunterzuladen.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige