Live-Forum - Die aktuellen Beiträge
Datum
Titel
19.04.2024 17:05:40
Zählen von Zeilen, in denen in bestimmten Bereich Daten sind
19.04.2024 16:34:52
gemeinsamer Filter über drei Spalten
19.04.2024 15:39:42
Exceltabelle daten per combobox zu word Datei
19.04.2024 14:04:05
PDF per VBA ausgeben - Seitenskalierung
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1436to1440
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
1436to1440
1436to1440
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Zahlen extrahieren aus "Zahlen/Text-Zelle"

Zahlen extrahieren aus "Zahlen/Text-Zelle"
17.07.2015 08:57:56
Denis

Hallo,
nach langer Suche bin ich leider nicht fündig geworden.
Ich möchte aus einer Zelle mit Zahlen und Text per VBA die Zahlen extrahieren.
Die Zahlen stehen am Anfang der Zelle, sind aber unterschiedlich lang.
Kann mir jemand weiterhelfen?
Gruß
Denis

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

Betreff
Datum
Anwender
Anzeige
AW: Zahlen extrahieren aus "Zahlen/Text-Zelle"
17.07.2015 09:20:13
Tino
Hallo,
kannst mal diesen Code testen.
Bereich wo die Daten liegen entsprechend anpassen!
Sub Beispiel_Zahl_am_Anfang()
Dim rng As Range
Dim Regex As Object
Set Regex = CreateObject("Vbscript.Regexp")
'Ländereinstellung für Komma beachten, hier = ,
Regex.Pattern = "^\d+,?\d+"
'Bereich der durchlaufen werden soll
Set rng = Tabelle1.Range("A2:A5")
For Each rng In rng
If Regex.test(rng.Value) Then
'eine Zelle nach rechts ergebnis einfügen
rng.Offset(, 1).Value = Regex.Execute(rng.Value)(0) * 1
Else
rng.Offset(, 1).Value = Empty
End If
Next rng
End Sub
Gruß Tino

Anzeige
AW: Zahlen extrahieren aus "Zahlen/Text-Zelle"
17.07.2015 10:23:01
Denis
Hallo Tino,
danke hat geklappt.
Ne Kleinigkeit passt aber noch nicht so ganz.
Und zwar wenn die Zahl mit einer oder zwei Nullen beginnt, nimmt er diese nicht mit.
Wie geht man damit um?
Gruß
Denis

AW: Zahlen extrahieren aus "Zahlen/Text-Zelle"
17.07.2015 10:29:40
Tino
Hallo,
dann müssen wir die Zahl als String behandeln.
Versuch mal und mach aus der Zeile. 
rng.Offset(, 1).Value = Regex.Execute(rng.Value)(0) * 1
diese
rng.Offset(, 1).Value = "'" & Regex.Execute(rng.Value)(0)
Gruß Tino

AW: Zahlen extrahieren aus "Zahlen/Text-Zelle"
17.07.2015 11:02:34
Denis
Danke. Klappt wunderbar :)
Gruß
Denis
Anzeige

343 Forumthreads zu ähnlichen Themen

Zahlen aus Zelle auslesen
Timo

Hallo liebes Forum,
gibt es eine Möglichkeit aus einer Zelle nur die Zahlen auszulesen, siehe Beispiel:
'123456 BLA --> 123456
Ist eine Excel-interne (keine VBA-Programmierung) hier möglich?
Vielen Dank für die Unterstützung!
Timo
14.08.2008 11:16:00
Thread-ID: 1001770
7 Beiträge
Anzeige
in spalte müssen 2 gleiche zahlen vorh. sein ...
Jessi

hallo zusammen,
suche nach einem makro, dass in spalte A überprüft ob von den dort geschriebenen zahlen jeweils zwei gleiche vorhanden sind. es geht um eine doppelbelegung eines zimmers. die zahl ist die zimmer-nr.
wäre z.b. nur einmal eine zahl in der spalte, wäre es möglich in das jew...
04.10.2008 15:33:00
Thread-ID: 1014154
5 Beiträge
Eine Zahl mit vorhandener Zahlenliste vergleichen
Niklas

Hallo Leute!
Es geht darum, eine eingegebene Zahl mit einer vorhandenen Zahlenliste vergleichen und die beiden nächstgelegenen Zahlen der Zahlenliste verwenden!
zur veranschaulichung:
ich habe die die zahlenliste : 1 , 2, 3, 4, 5, 6, 7
der eingegebene Wert ist z.B 1.5 dann soll...
17.10.2008 09:49:22
Thread-ID: 1017045
8 Beiträge
Anzeige
Autofilter - Anzahl vorh. Sätze
KViertel

Hallo in die Runde,
In einem Tabellenblatt wird In VBA ein Autofilter gesetzt. Die dabei angezeigten Sätze sollen in ein anderes Tabellenblatt kopiert werden. Wenn jetzt keine Sätze vorhanden sind, wird die Sub abgebrochen. In der Recherche habe ich einen Hinweis zu Subtotal gefunden, weiß...
11.12.2008 11:45:00
Thread-ID: 1031999
3 Beiträge
Zahlenreihe aus Zellen
Philipp

Hallo liebe Herber-Gemeinde,
heute möchte ich aus einer Zeilenreihe, die z.B. so aussieht:
A1 B1 C1 D1 E1 F1
12 16 22 45
Nun möchte ich, dass mir Excel aus der Zahlenreihe alle Zellen raussucht, wo Zahlen stehen und diese durch die Anzahl der der Zellen teilt, die Werte b...
16.12.2008 08:30:05
Thread-ID: 1033180
9 Beiträge
Vorgabe wie die Zahlen geschrieben werden müssen
ganz

Guten Abend,
ich möchte das in einer Zelle die Zahlen NUR genau nach Vorgabe geschrieben werden können, damit ich später besser per Autofilter sortieren kann.
ZB. soll eine solche Zahlenkombi auch nur in folgenden Blöcken eingetragen werden können:
222 0 78 937
_ _ _...
29.01.2009 20:42:37
Thread-ID: 1045190
8 Beiträge
+ Zeichen vor einer positiven Zahl
Ropa

HAllo
wie bekomme ich bei allen positiven Zahlen automatisch das + Zeichen davor
Grüße
Ropa
27.02.2009 12:27:01
Thread-ID: 1054699
4 Beiträge
gewisse sonderzeichen aus zelle entfernen
Tobias

Hallo allerseits,
Ich würde gerne ein gewisses sonderzeichen aus einer zelle entfernen
nämlich dieses: •
If ((cells(i,2) = ?) then ' wenn die zelle dieses zeichen enthält
cells(i,2) = ? ' entfernen
End if
Was muss ich in diesen code einb...
28.02.2009 15:56:56
Thread-ID: 1055091
8 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
11
4
7
5
2
8
7
3
7
6
11
4
3
4
3
5
10
7
9
11
5
5
3
6