Live-Forum - Die aktuellen Beiträge
Datum
Titel
16.10.2025 17:40:39
16.10.2025 17:25:38
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

von Rechts ausschneiden

Forumthread: von Rechts ausschneiden

von Rechts ausschneiden
03.01.2006 18:02:37
Rechts
Hallo Leute,
ich habe in Spalte D folgendes stehen:
Behlertstr. 3A, 14467 Potsdam
ich möchte nun das straße und Ort getrennt werden.
also 13 stellen ausschneiden und in die Zeile daneben wieder einfügen.
so das in spalte D Straße und Hausnummer steht und in Spale E dann PLZ und Ort
Bitte helft mir.
Gruß Martin
Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: von Rechts ausschneiden
03.01.2006 18:10:29
Rechts
Hallo Martin!
Probier mal!
Sub trennen()
Dim lngRow As Long, lngLast As Long, n As Integer

lngLast = Range("D65536").End(xlUp).Row

For lngRow = 2 To lngLast
  n = InStr(1, Cells(lngRow, 4), ",")
  If n > 0 Then
    Cells(lngRow, 5) = Trim$(Mid(Cells(lngRow, 4), n + 1, 99))
    Cells(lngRow, 4) = Left(Cells(lngRow, 4), n - 1)
  End If
Next

End Sub


'******************************
'* Gruß Sepp
'*
'* Rückmeldung wäre nett!
'******************************

Anzeige
AW: von Rechts ausschneiden
03.01.2006 18:10:51
Rechts
hallo Martin,
also ich stell mir mal vor, dass plz und ort nicht immer 13 zeichen lang sind.
falls hinter der hausnummer immer ein Komma geht das hervorragend mit Daten-Text in Spalten-Getrennt
gruss thomas
AW: von Rechts ausschneiden
03.01.2006 18:17:52
Rechts
Supi,
genau das richtige.
Dank an euch beide.
Schönes neues Jahr grus Martin
Anzeige
freut uns geholfen zu haben :-) ot.
03.01.2006 21:29:21
th.heinrich
;

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige