Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.04.2024 21:51:33
Idee für Grafik
26.04.2024 21:29:07
PQ zufällige Reihenfolge
26.04.2024 17:18:47
Große Datenmenge in komplexes Diagramm verpacken
26.04.2024 16:22:47
Aktualisierung Verknüpfung bei geschlossener Quelldatei
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
632to636
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
632to636
632to636
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Text von Zahl trennen

Text von Zahl trennen
07.07.2005 11:48:10
Zahl
Hallo
Wie kann ich per VBA einen Text von einer Zahl trennen. Text und Zahl haben unterschiedliche Längen und sind mit einem Leerschlag getrennt (zB. "Re 2345").
Text/Zahl steht in Spalte C, ich möchte den Text in Spalte B und die Zahl in Spalte C schreiben.
Gibt es auch eine Möglichkeit, wenn kein Leerschlag zwischen Text und Zhal.
Habe im Forum gesucht, aber nicht's gefunden.
Vielen Dank und Gruss
Gregor

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

Betreff
Datum
Anwender
Anzeige
AW: Text von Zahl trennen
07.07.2005 12:03:00
Zahl
Hi Gregor,
folgender Code funktioniert in beiden Fällen, mit und ohne Leerzeichen:

Sub trennen()
Dim a As Integer
Dim b As Integer
For a = 1 To Cells(65536, 3).End(xlUp).Row
For b = 1 To Len(Cells(a, 3).Value)
If IsNumeric(Mid(Cells(a, 3).Value, b, 1)) Then Exit For
Next b
Cells(a, 2).Value = Left(Cells(a, 3).Value, b - 1)
Cells(a, 3).Value = Right(Cells(a, 3).Value, (Len(Cells(a, 3).Value) - (b - 1)))
Next a
End Sub

Allerdings muss der Text immer VOR der Zahl stehen.
Schönen Gruß,
Andi
AW: Text von Zahl trennen
07.07.2005 12:14:54
Zahl
Andi
Herzlichen Dank für die schnelle Antwort. Funktioniert perfekt.
Gregor
Anzeige
Gern geschehen... (ot)
07.07.2005 13:26:25
Andi
.
AW: Text von Zahl trennen
07.07.2005 14:28:11
Zahl
Hallo,
hier eine Variante, bei der es egal ist, ob der Text vor oder nach der Zahl steht und ob überhaupt beide vorkommen.
Dien einzelnen Ziffern werden in der Variablen z gespeichert, die Buchstaben in der Variablen t:

Sub Text_Zahl()
Dim i%, j%, z&, t$
For i = 1 To Cells(65536, 3).End(xlUp).Row
For j = 1 To Len(Cells(i, 3).Value)
If IsNumeric(Mid(Cells(i, 3).Value, j, 1)) Then
z = z & Mid(Cells(i, 3).Value, j, 1)
Else
t = t & Mid(Cells(i, 3).Value, j, 1)
End If
Next j
Cells(i, 4).Value = z
Cells(i, 5).Value = t
z = 0
t = ""
Next i
End Sub

Gruß
Heinz
Anzeige

303 Forumthreads zu ähnlichen Themen

Zahlencode mit Punkte Formatieren
runny

Wer kann mir weiter helfen.
Ich habe einen 10-stelligen Zahlencode 0265006214 und diesen soll Excel autom. in das Format 0265.006.214 bringen.
Also nach der 4.Stelle und der 7.Stelle einen Punkt (SAP-Format). Zelle formatieren und ####.###.### habe ich schon ohne Erfolg geprüft.
Er...
28.08.2008 00:14:00
Thread-ID: 1005247
3 Beiträge
Anzeige
Zellinhalte Zahlen und Text extrahieren
Marky

Hallo Excel Spezialisten !
Ich würde gerne aus zwei nebeneinander stehenden Spalten die Zellinhalte extrahieren.
Die Zellinhalte bestehen aus Zahlen und Text. Die aus den Zellen zu extrahierenden Zahlen und Texte
stehen immer in den Spalten K10 und N10.
Die Zielzellen sind immer...
29.09.2008 12:55:00
Thread-ID: 1013076
6 Beiträge
Zelle mit 50 stelliger Zahl
Mathias

Hallo guten morgen,
kann mir bitte jemand sagen wie ich eine Zelle so formatieren kann das darin eine ca. Zahl mit 50 Stellen angezeigt wird.
Folgendes Problem,die Zahl sind so auf 350015+28€ d.h. sie wird als Text angezeigt, formatiere ich diese als Zahl bekomme ich zwar etliche Stell...
21.10.2008 08:33:45
Thread-ID: 1017842
3 Beiträge
Anzeige
Text_Zahlenwert suchen und Zahlen "ablegen"
Lemmi

Hallo zusammen,
ich möchte aus einer drei spaltigen Tabelle Zahlen auslesen, die dann Monatsweise abgelegt werden sollen!
Es soll immer nach einem " Schlüsselwort" (...kann auch eine x beliebige Zahlfolge in der Benennungsliste sein) die Auslesung der Zahlenwerte durchgeführt werden.
03.01.2009 22:11:00
Thread-ID: 1036655
4 Beiträge
Text und Zahlen teilen
Bernie

Hallo Leute,
ich suche ganz dringen nach einem Makro, mit dem ich aus einer Tabelle mit Straßennamen - diese sind oft chaotisch geschrieben- z.B. Bahnhofstraße45A
a) die Straße in eine Spalte
b) die Hausnummer (mit A usw.) in eine Spalte
ausgeben kann.
Hat jemand ein zünd...
05.03.2009 14:39:23
Thread-ID: 1056861
7 Beiträge
Text und Zahlen in einer Zelle
Sammy

Hallo liebes Forum
Ich bekomme eine Liste mit ca. 200 Namen mit Personalnummeren.
die Zelle um die es geht sieht so aus.
Zelle A1 143(Gerda Becker)
Ich benötige allerdings die Zahl 143 in einer Zelle und (Gerda Becker) in einer Zelle.
Falls das nicht möglich ist, würde e...
24.05.2009 10:20:18
Thread-ID: 1076915
7 Beiträge
Zahl und Datum als formatierten Text übergeben
k

Hallo,
sicherlich stelle ich mich nur wieder zu blöd an, aber ich komm nicht weiter.
Ich habe in einer Tabelle Werte (Umsatzzahlen) sowie Datums-Werte(Tag der Rechnung) und möchte diese gern aber als "TEXT" an ein Listview-element weiter gegeben.
Dabei soll aber optisch es noch wie...
21.08.2009 10:03:57
Thread-ID: 1097614
7 Beiträge
Zahlenwert von Text trennen
Text

Hallo zusammen,
habe mal wieder ein kleines Problem mit Zahlen und Einheiten!
Ich habe heute eine Zahl mit Einheit (verschiedenen Einheiten) in einer Zelle z. B. in A1 123,03 Nm oder A2 123,123456 kg
Wie kann ich die Einheit von dem Zahlenwert trennen?
Mein ergebnis soll Zelle...
15.09.2009 19:31:11
Thread-ID: 1103044
5 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
2
11
5
2
14
3
6
6
6
4
3
3
3
7
4
5
3
5
22
11
6
2
5
3
1