Supportnet / Forum / Tabellenkalkulation

Hallo, vor kurzem gabs hier das problem mit den postleitzahlen und den ortsnamen. ich habe eine steigerungsform: ich habe eine adressen und möchte die strassennamen von den hausnummern trennen. weiss da jemand rat? danke, Monika

hallo Monika,

kommst du mit der Lösung aus dem "PLZ/Orts-Thread" Text-in-Spalten denn nicht weiter?

Wo genau ist denn bei dir das Problem?

CU
want2cu

hallo,

das problem liegt darin, dass strassennamen aus mehreren wörtern bestehen können, dass bei der hausnummer z.b. nr.5 steht oder dass zwischen strassenname und hausnummer das leerzeichen fehlt ...
ich bräuchte irgend eine möglichkeit, bei der trennung zwischen buchstaben und ziffern unterscheiden zu können.

danke,
Monika

Dazu brächtest Du eine Funktion, die Dir die Position der ersten Ziffer angibt. Ich bin kein Excel-Experte, aber ich glaube kaum, dass das zu den Standard-Funktionen gehört.
Und auch das funktioniert nur solange, wie die Adressen dem Schema "Schillerstraße 23a" folgen, was nicht immer der Fall ist (Stichwort: Mannheimer Ringadressen).
mfg
Hendrik

hallo monika

versuch doch mal für straßennamen hausnummer etc eine eigene spalte zu verwenden ..kannst dann unterschiedliche formate einfügen das gitternetz wird ja auch nur mit gedruckt wenn du es auch willst

wenn du allerdings strassenname und hausnummer in einer zelle brauchts kannste die zellen auch verknüpfen und die 2 hilfspalten dann aeinfach ausblenden

hoffe das hilft
cya

Hi Monika,

ich gehe mal davon aus, daß die Daten in A1 beginnen.
Jetzt zuerst in C1 die Formel:
{=RECHTS(A1;SUMME(N(ISTZAHL(RECHTS(A1;SPALTE(1:1))*1))))*1}
Die geschweiften Klammern darst Du nicht mit eingeben. Die Formel normal eingeben und dann mit Strg Shift und Enter abschliessen.
Die Formel stammt von Boris Georgi und kann man auf excelformeln.de finden.
Die Formel soweit benötigt nach unten ziehen.
In B1 nun diese Normalformel, also ohne {}:
=LINKS(A1;FINDEN(C1;A1)-1)
Ebenfalls wieder soweit benötigt nach unten ziehen.

CU Aliba

Hi , nochmal ich.

Hab noch vergessen zu erwähnen, daß dies nicht funzt, wenn Hausnrn. in der Art

Strasse 2-8 oder Strasse 26b

vorliegen.

Aber ich denke mal 90-95% können so erledigt werden und der Rest ist dann halt Handarbeit oder man kann nocheinmal irgendwelche Regeln erkennen um dann noch mal was per Formel zu machen.

CU Aliba

Hi,
hier die Makro-Lösung

Option Explicit

Sub test()
    Dim n%, m%
    Dim Hausnummer$
    For m = 1 To Cells(Rows.Count, 1).End(xlUp).Row
    For n = 1 To Len(Cells(m, 1))
      If IsNumeric(Mid(Cells(m, 1), n, 1)) Then
       Hausnummer = Mid(Cells(m, 1), n, Len(Cells(m, 1)) - n + 1)
       Cells(m, 2).Value = Left(Cells(m, 1), n - 1)
       Cells(m, 3).Value = Hausnummer
       n = Len(Cells(m, 1))
      End If
    Next
    Next
End Sub

Sollte auch funktionieren bei Straße2-8 oder Straße 2b. Bei dem Makro wird jede einzelne Stelle geprüft ob "ISNUMERIC".
Sobald eine Zahl auftaucht -> Hausnummer.
(Funktioniert nicht bei exotischen Straßen (Straße des 17. Juni ö.ä.)

Gruß
Günter

Hallo,

DANKE!

da habe ich ja eine richtige lawine losgetreten! ich bin noch nicht dazugekommen, eure vorschlaege auszuprobieren, werde aber alles versuchen.

lg,
monika

• Makro erstellen für Kommentar einfügen
• Oracle-Tabelle in Excel transponieren !!!!!
• Automatisches rückrechnen eines Datums
• Excel Diagramm mit lückenhaften Date
• Wenn-Funktion???