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

Name und Nummer in einem Feld

Forumthread: Name und Nummer in einem Feld

Name und Nummer in einem Feld
18.02.2004 13:24:47
Jörg
Hallo Zusammen, ich habe eine Zahl und Text in einerm Feld zusammengfeaßt. Dieses möchte ich automatisch trennen. Jemand einen Tipp?
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Name und Nummer in einem Feld
18.02.2004 13:31:18
Jörg
Hi Jörg,
sind die Zahlen und der Text durch ein Zeichen getrennt?
MfG
Jörg
AW: Name und Nummer in einem Feld
18.02.2004 13:42:38
Jörg
Nein 3 Leerzeichen - Muß aber eine andere Tabellentrennung vornehmen - da diese für die restlichen spalten richtig ist.
AW: Name und Nummer in einem Feld
18.02.2004 13:31:57
Julia
wenn du da ein leerzeichen zwischen hast, dann speicher die datei doch als CSV datei abund implementier sie mit excel mit der option das leerzeichen als trennung angesehen werden.
Julia
Anzeige
AW: Name und Nummer in einem Feld
18.02.2004 13:41:35
andre
hallo allerseits,
es geht viel einfacher - menü daten, text in spalten
ansonsten mal googeln nach text zahl trennen site:herber.de
gruss andre
Vielleicht,... oder auch nicht...
18.02.2004 13:43:20
Ramses
Hallo Andre
noch wissen wir ja nicht, ob der Fragende sich herablässt das Rätsel aufzulösen, ob Trennzeichen verwendet werden oder nicht :-)
Ohne Trennzeichen,.... kein Text in Spalten :-)
Gruss Rainer
Anzeige
AW: Vielleicht,... oder auch nicht...
18.02.2004 14:00:50
Jörg
Vielleicht hilft das
Danke im Voraus
AW: Vielleicht,... oder auch nicht...
18.02.2004 14:01:55
Jörg
Sorry die Datei wude nicht mitgeschickt. Im Feld sind mehrer Leerzeichen enthalten. Hilft das
AW: Name und Nummer in einem Feld
18.02.2004 13:39:31
Ramses
Hallo
Den Code in eine Modul deiner Arbeitsmappe kopieren


Function Div_Text(myR As Range) As String
Dim As Integer
Dim tmpstr As String
For i = 1 To Len(myR.Value)
    If Not IsNumeric(Mid(myR.Value, i, 1)) Then
        tmpstr = tmpstr & Mid(myR.Value, i, 1)
    End If
Next i
Div_Text = tmpstr
End Function
Function Div_Number(myR As Range) As Double
Dim As Integer
Dim tmpstr As String
For i = 1 To Len(myR.Value)
    If IsNumeric(Mid(myR.Value, i, 1)) Then
        tmpstr = tmpstr & Mid(myR.Value, i, 1)
    End If
Next i
Div_Number = tmpstr * 1
End Function

     Code eingefügt mit Syntaxhighlighter 2.5

Aufgerufen wird er so
Anzeige
AW: Name und Nummer in einem Feld
18.02.2004 13:53:51
Jörg
Super - vielen Dank
Merci :-) Geschlossen o.T.
18.02.2004 13:59:36
Ramses
...
;

Forumthreads zu verwandten Themen

Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken

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