Wert ab einer stelle in der Zelle wiedergeben

Guten abend liebe Foren-Gemeinde,
Habe erneut ein Problem oder ich denke falsch.
Habe eine Liste in Spalte B die diveres Mengenangaben stehen.
folgendes habe ich mir zusammengebastelt:
=(WENN(ISTFEHLER(SUCHEN("ltr";$B2))=WAHR;SUCHEN("kg";$B2);SUCHEN("ltr";$B2)))
Nun weis ich ja wo das gesuchte Wort steht. Jetzt möchte ich aber, dass der Wert davor ausgegeben wird. Der Inhalt der Zelle ist variabel (zb: "25 ltr/30 kg", "Eimer Inhalt: 3 kg"; "Chlorit 7,5% 30 ltr" oder einfach nur "1,0 ltr"
Bevorzugt wird die ltr-angabe. Ich benötige die Zahl, um eine Liste zu erstellen, wieviel wir von dem Produkt gesamt (mit verschiedenen Verpackungsgrößen) versendet haben.
BSP. Tabelle:
https://www.herber.de/bbs/user/101734.xlsx
Vielen Dank im Vorraus für eure Hilfe.
LG Matthias
Das dient dazu, das ich eine

Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

…kompliziert wdn, Matthias,
deshalb schlage ich folgende Lösung mit UDF-haltigen Fmln vor (UDF=eigene Funktion):

	A	B	C	D	E	F
1	Produkt	Menge	ltr	kg	ltr	kg
2	Aktiv-P	1,0 ltr	1,0		WAHR
3	Aktiv-P	10 ltr	10,0		WAHR
4	Aktiv-P	30 ltr	30,0		WAHR
5	Aqua Puro	"N" Eimer Inhalt 2 kg		2		WAHR
6	Aqua Tivo	5 kg		5		WAHR
7	Aqua Tubo	CL2 10 kg		10		WAHR
8	Aqua Tubo	FO 10 kg		10		WAHR
9	Biofilmentferner	10 ltr	10,0		WAHR
10	Chlordioxid Stammlösung	10 kg		10		WAHR
11	Eisen-III-Chlorid-Lösung	40% 40 kg		40		WAHR
12	Florazon	Chlorit 7,5% 30 ltr	30,0		WAHR
13	Natriumhypochlorit 13%	10 ltr /12 kg	10,0	12	WAHR	WAHR
14	Natriumhypochlorit 13%	30 ltr /35 kg	30,0	35	WAHR	WAHR
15	Natriumhypochlorit 13%	60 ltr/70 kg	60,0	70	WAHR	WAHR
16	Natronlauge	50% 45 kg		45		WAHR
17	Natronlauge	25% 30 kg		30		WAHR
18	Natronlauge	25% 60 kg		60		WAHR
19	Optipo-N	1,0 kg		1		WAHR
20	Optipo-N	Eimer Inhalt: 3 kg		3		WAHR
21	Oxys	1,0 ltr	1,0		WAHR
22	Oxys	10 ltr	10,0		WAHR
23	Oxys	30 ltr	30,0		WAHR
24	Oxys-K	8,3 ltr/10 kg	8,3	10	WAHR	WAHR
25	Oxys-K	25 ltr/30 kg	25,0	30	WAHR	WAHR
26	Salzsäure	31/33% 30 kg		30		WAHR
27	Folmar	(IBC) 1300 kg		1300		WAHR
28	F3232	(IBC) 1000 ltr	1000,0		WAHR
29					Kontrolle

Die Fml dafür ist eine 2zellige MatrixFml über eine Zeile der Spalten C:D und kann nach unten gezogen wdn. Sie lautet:
C2:D2[;C3:D28]:{=VSplit(WECHSELN(WAHL(ISTZAHL(SUCHEN("ltr*/";B2))+(RECHTS(GLÄTTEN(B2);2)="kg")+1;"# ";" #";"#");"#";
VJoin(WENN(ISTZAHL(VSplit(WECHSELN(WECHSELN(B2;" /";"/");"ltr/";"-");;1));
ABS(VSplit(WECHSELN(WECHSELN(B2;" /";"/");"ltr/";"-");;1));"");;-1));;1)}
Die beiden UDFs VJoin und VSplit sind in dieser Datei des Archivs zu finden.
Übrigens muss man eine Wenn-Bedingung nicht mit WAHR vergleichen, schon gar nicht, wenn das Ergebnis ohnehin nur WAHR oder FALSCH lauten kann…! ;-]
Morrn, Luc :-?
Besser informiert mit …

Function WertVorEinheit(Gesamttext As String, Einheit As String) As Variant Dim TeilTexte Dim i As Long Gesamttext = Replace(Gesamttext, "/", " ") Gesamttext = Replace(Gesamttext, Einheit, " " & Einheit) Gesamttext = WorksheetFunction.Trim(Gesamttext) TeilTexte = Split(Gesamttext, " ") For i = 1 To UBound(TeilTexte) If TeilTexte(i) = Einheit Then WertVorEinheit = TeilTexte(i - 1) If IsNumeric(WertVorEinheit) Then WertVorEinheit = CDbl(WertVorEinheit) Exit For End If Next End Function

Beliebteste Forumthreads (12 Monate)

Wert ab einer stelle in der Zelle wiedergeben

11
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

313 Forumthreads zu ähnlichen Themen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

Wert ab einer stelle in der Zelle wiedergeben

11 Beiträge zum Forumthread Beiträge zu diesem Forumthread

313 Forumthreads zu ähnlichen Themen

VBA Beispiele zu verwandten Themen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

11
Beiträge zum Forumthread

Beiträge zu diesem Forumthread