Live-Forum - Die aktuellen Beiträge
Datum
Titel
17.04.2024 21:55:37
Preiserhöhung über mehrere Jahre berechnen
17.04.2024 20:19:32
Endzeitpunkt berechnen aus d:hh:mm errechnen
17.04.2024 18:57:33
Errinnerungsfunktion
17.04.2024 16:56:58
Stunden addieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1624to1628
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1624to1628
1624to1628
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Straße und Hausnummer via VBA trennen

Straße und Hausnummer via VBA trennen
28.05.2018 20:27:59
Sabrina
Hallo Leute,
ich habe in einer Zelle den Straßennamen mit der Hausnummer stehen.
Nun muss ich bei der Weiterverarbeitung in VBA die Hausnummer von der Straße trennen.
Leider gibt es verschiedene Schreibformen wie :
Hauptstraße 2 - Hauptstr. 2 - Hauptstr.2 - Hauptstr. 2a - Hauptstr. 2-4 - Große Hauptstr. 2 ... usw.
https://www.herber.de/bbs/user/121862.xlsm
Kann mir jemand helfen?
Liebe Grüße Sabbel

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: ein Ansatz
28.05.2018 20:35:31
Fennek
Hallo,
versuche diesen Code:

Str_Nr = cells(5,3)
for i = 1 to len(Str_Nr)
if mid(Str_Nr, i,1) like "#" then
Str = left(Str_Nr, i-1)
Nr = mid(Str_Nr,i)
exit for
end if
next i
mfg
(Läppy bei Microsoft?)
(ungetestet)
AW: ein Ansatz
28.05.2018 20:51:22
Sabrina
Oh Danke ..
funktioniert wunderbar
AW: Straße und Hausnummer via VBA trennen
29.05.2018 08:13:54
Martin
Hallo Sabrina,
hier noch eine zweite Möglichkeit:
    Dim arrStreet As Variant, strName As String
strName = Cells(5, 3)                           'Verweis auf Zelle mit Straßennamen
arrStreet = Split(strName, " ")
MsgBox Left(strName, Len(strName) - Len(arrStreet(UBound(arrStreet))) - 1) 'Straßenname
MsgBox arrStreet(UBound(arrStreet))                                        'Hausnummer
Viele Grüße
Martin
Anzeige
...es geht sogar noch einfacher....
29.05.2018 08:19:11
Martin 

Dim strName As String
strName = Cells(5, 3) 'Verweis auf Zelle mit Straßennamen
MsgBox Left(strName, InStr(strName, " ") - 1)                'Straßenname
MsgBox Right(strName, Len(strName) - InStrRev(strName, " ")) 'Hausnummer
Viele Grüße
Martin
AW: Straße und Hausnummer via VBA trennen
29.05.2018 10:20:39
Daniel
Hi
wenn man davon ausgehen kann, dass die Hausnummer mit der ersten Ziffer beginnt, dann kannst du auch die Postion der ersten Ziffer suchen und dann mit LINKS bzw TEIL und der Postion der ersten Ziffer die Adresse auftrennen.
die Position der ersten Ziffer im Text bekommst du mit dieser Formel in B1 (Text in A1):
B1: =AGGREGAT(15;6;FINDEN({1.2.3.4.5.6.7.8.9};A1);1)
in C1 und D1 lässt du dir dann Straße und Hausnummer ausgeben:
C1: =Glätten(Links(A1;B1-1))
D1: =Teil(A1;B1;99)
das Glätten entfernt ggf noch das Leerzeichen, das zwischen Straße und Hausnummer steht.
Gruß Daniel
Anzeige

14 Forumthreads zu ähnlichen Themen

Straßennamen und Nr. trennen
RoB

Moin moin liebe Leute!
Ich habe ich einer Spalte etliche Straßennamen samt Hausnr. aufgelistet. Wie aus dem Betreff schon zu entnehmen ist, möchte ich nun die Str.namen und die Nr. jeweils in zwei Spalten sortieren. Klar dachte ich da an die klassische Lösung:
=LINKS(A14;SUCHEN(" ";A14;...
10.06.2010 14:16:03
Thread-ID: 1161252
7 Beiträge
Anzeige
Straßenliste mit Hausnummern umformatieren
Andy

Hallo zusammen,
ich habe eine Liste mit Straßen und Hausnummern, die ich umformatieren muss. Dazu benötige ich mal eure Hilfe.
Folgende Daten habe ich:
in Spalte A die Straßennamen und in Spalte B die zugehörigen Hausnummern:
Beispiel:
Spalte A - Spalte B
A-Straße - 1, 2...
06.03.2014 17:06:04
Thread-ID: 1352459
9 Beiträge
Hausnummern von Strasse trennen
michael
Hallo zusammen
Kein Tage ohne Probleme. In Spalte G habe ich eine Menge Strassennamen mit Hausnummern. Gibt es irgendeine Formel bzw einen Code mit dem man die Hausnummern von den Strassennamen trennen kann. Falls das überhaupt möglich ist.
Wienerstrasse 36
Nansengasse 1
Lieleweg 66
...
20.01.2004 07:36:59
Thread-ID: 366698
7 Beiträge
Anzeige
Strasse und Hausnummer von einer kollone in 2 koll
einer

Ich habe eine liste wo der Strassenname und die hausnummer in einer Kolonne aufgeführt sind. Ist es möglich Strassenname und Hausnummer zu trennen - so das Strassenname und Hausnummer je eine Kolonne haben?
strasse
Guldhaugsletta 48
Johan Svendsens vei 20
Landskronaveien 123
Tår...
10.03.2005 09:30:22
Thread-ID: 583001
3 Beiträge
Trennen von Strassennamen und Hausnummern
Strassennamen

Hallo zusammen,
bei folgendem Problem benötige ich Hilfe:
Ich habe eine Spalte in der sich in jeder Zeile Strassennamen und die Hausnummern in einem Feld befinden.(18.000 Datensätze). Ich benötige aber die Strassen und die Hausnummern in getrennten Feldern. Über welche Formel oder wie k...
10.07.2005 11:25:24
Thread-ID: 635275
10 Beiträge
Strasse von hausnummer trennen und alte Zeile lösc
hausnummer

https://www.herber.de/bbs/user/25184.xls
Hallo, in der anliegenden Datei soll immer die Zeile in der Strasse und Hausnummer in einem stehen getrennt werden in eine Spalte mit Strasse und eine mit Hausnummer anschließend soll die alte Spalte (in der Strasse und Hausnummer noch zusammen stehe...
01.08.2005 12:30:21
Thread-ID: 645466
3 Beiträge
Hausnummer von Straße trennen
Straße

Hallo Excelgemeinde,
ich denke die Lösung meines Probs habe ich unter folgender Adresse
hier im Forum wohl gefunden:
'http://www.egier.de/w-w-w/Strasse-Hausnr5.xls'
Leider funktioniert die Kontaktaufnahme mit Herrn Gier per Mail nicht.
kann mir jemand die Entsprechenden Form...
10.04.2006 15:39:21
Thread-ID: 753931
10 Beiträge
Straße und Hausnummer trennen
Sascha
Hallo Leute,
hätte mal eine Frage an euch.
Und zwar habe ich eine Liste in der in der Spalte A viele Straßen mit den dazugehörigen Hausnummern stehen. Jetzt möchte ich gerne das die Straße in der Spalte A stehen bleibt und die Hausnummer aber in die Spalte B eingefügt wird.
Mir "Text in...
16.06.2006 12:07:09
Thread-ID: 773630
4 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
6
8
8
6
5
2
9
2
9
3
3
3
6
3