Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 16:50:59
2 Zellen in 2 Blättern mit unterschiedlichen Bereichen vergl
25.04.2024 15:03:35
Unterschiedliche Dateien miteinander abgleichen lassen
25.04.2024 14:05:48
Makro in aktueller Zelle ausführen mit Doppelklick
25.04.2024 12:56:25
Werte von Kunden und Artikel stehen untereinander
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
752to756
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
752to756
752to756
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Hausnummer von Straße trennen

Hausnummer von Straße trennen
10.04.2006 15:39:21
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 Formeln bzw. die Mailadresse
mitteilen.
Vielen Dank

9
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Hausnummer von Straße trennen
10.04.2006 16:12:45
Straße
Primär hilft mir dies schon.
Doch leider greifen die Formeln nicht alle Möglichkeiten ab.
z.B. Leerstelle zwischen HausNr. und Buchstabenzusatz ("7 b")
Das was ich in der genannten Excel-Datei gesehen hab, würde
absolut meinen Vorstellungen entsprechen.
Meine Tabelle ist mir einfach zu groß, bzw. ändert sich diese
auch ständig, sodaß ich nicht gerne "von Hand" zu ändern möchte.
Danke im Voraus
Anzeige
AW: Hausnummer von Straße trennen
10.04.2006 17:54:46
Straße
Angeber, gib noch ein bisschen an für mich.
Du weißt ich höre es gern,
wenn Du von Deinen Abenteuern sprichst.
Angeber, Angeben ist Dein Lieblingssport.
Anzeige
AW: Hausnummer von Straße trennen
11.04.2006 11:41:08
Straße
Armes Klöps-chen *tätschel*...diese Welt ist wirklich sehr, sehr böse
Versuchs doch mal in irgendeinem Chat-Room.
Gruß
Harald
AW: Hausnummer von Straße trennen
11.04.2006 08:38:28
Straße
Das sieht mir auch ganz brauchbar aus.
Leider kann ich es nicht nutzen.
Download wurde zwar ausgeführt; aber
beim Versuch das ganze zu starten will
er ständig Outlook installieren ?
Was mache ich falsch ?
Kann ich evtl. den Code so bekommen ?
Danke
AW: Hausnummer von Straße trennen
11.04.2006 09:03:53
Straße
Hallo Micha,
wie versuchst Du denn, das Ganze zu starten? Du musst das Addin unter Extras-AddIns einbinden. In der Standard-Symbolleiste wird dann eine Schaltfläche (rote Lampe) eingefügt, mit der das AddIn gestartet wird.
Hier der Code (Userform mit RefEdit-Element)


Private Sub CommandButton1_Click()
Dim OldAdd As String
Dim Street As String, HsNr As String
Dim i As Integer, k As Integer, l As Integer
Dim rng As Range
Dim strTxt
Application.ScreenUpdating = False
On Error Resume Next
Range(RefEdit1.Value).Select
k = Selection.Column
Range(Columns(k + 1), Columns(k + 2)).Insert Shift:=xlToRight
Range(Columns(k + 1), Columns(k + 2)).HorizontalAlignment = xlLeft
Range(Columns(k + 1), Columns(k + 2)).NumberFormat = "@"
For Each rng In Selection
    OldAdd = rng.Value
    xxx = 0
    For i = Len(OldAdd) To 1 Step -1
        If IsNumeric(Mid(OldAdd, i, 1)) = True Then xxx = 1
        If IsNumeric(Mid(OldAdd, i, 1)) = False And xxx = 1 Then
            If Mid(OldAdd, i, 1) <> "-" Then
                HsNr = Right(OldAdd, Len(OldAdd) - i)
                Street = Left(OldAdd, i)
                xxx = 0
                y = rng.Row
                z = rng.Column
                Cells(y, z + 1) = Street
                Cells(y, z + 2) = HsNr
                Exit For
            End If
        End If
    Next i
Next
[A1].Select
Application.ScreenUpdating = True
Unload Me
End Sub


Gruß aus Leipzig
P@ulchen
www.excel-werkstatt.de
Anzeige
AW: Hausnummer von Straße trennen
11.04.2006 14:32:50
Straße
Vielen Dank an alle.
P@ulchen, der Code läuft jetzt super.
War wohl alleine einfach zu doof um den Code zum läufen zu bringen.
Jetzt klappts.
AW: Hausnummer von Straße trennen
12.04.2006 16:42:27
Straße
Hallo Micha,
was klappte bei der Mail an mich nicht? Auf http://www.egier.de/ steht meine Mail-Adresse, hier in der Profilliste auch.
Wenn du noch Interesse an der Lösung hast, kannst du mir eine Mail schreiben - an
eri474 bei web.de
(Ich habe seinerzeit den Code aus der hochgeladenen Mappe entfernt, weil er missbräuchlich kommerziell - für über 80 000 Adressen - verwendet wurde. Deshalb würde ich die auch bitten, mir zu schreiben, für welchen Zweck du die Adressen aufbereiten willst.)
Rückmeldung wäre nett! - Grüße von Erich aus Kamp-Lintfort
Anzeige

81 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
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
Straße und Hausnummer trennen auch mit leerzeichen
Olli

Hallo ich dringend Hilfe zu folgenden Script:
####################
Sub Trennen() Dim lngZeile As Long Dim intZeichen As Integer lngZeile = 0 With ActiveCell Do While IsEmpty(Cells(.Row + lngZeile, .Column)) = False For intZeichen = 1 To Len(Cells(.Row + lngZeile, .Column)) If IsNumeric(...
20.11.2004 10:40:39
Thread-ID: 520522
6 Beiträge
Anzeige
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
Spalte bei Leerzeichen trennen
Sascha

Hallo,
ich möchte eine Spalte beim 1. Leerzeichen in 2 Spalten trennen.
Bsp:
Schraube M8 = (Spalte 1) Schraube /(Spalte 2) M8
Bohrmaschine HW234 678 = (Spalte 1)Bohrmaschine /(Spalte 2)HW234 678
Zu beachten ist eben, dass die Trennung beim 1 Leerzeichen erfolgen soll und
...
20.10.2005 08:13:58
Thread-ID: 684294
3 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
860to864: Hausnummer von Strasse trennen
Strasse

Hallo zusammen,
ich habe in einer Tabelle in Spalte A 1 - A10000 jeweils eine Strassenbezeichnung mit Hausnummer. wie kann ich die Hausnummer trennen und in die jeweilige Zelle in Spalte B einfügen?
Danke im Voraus
Jürgen
04.04.2007 17:02:02
Thread-ID: 860423
4 Beiträge
Anzeige

Links zu Excel-Dialogen

CommandButton RefEdit

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
6
5
2
9
2
2
3
3
3
6
3
6
5
8
7
6
22
5
2
9
2
7
4