18.12.2024, 15:17
Hallo,
in A1: HORNADY CUSTOM GRADE SERIES III 2-TLG MATRIZENSATZ 5,45X39/.221
mit folgender Formel sollte auch eine korrekte Konversion erfolgen:
=LET(txt; TEXTTEILEN($A$1; " "); REDUCE(""; txt; LAMBDA(Akk;tx; TEXTVERKETTEN(" "; 1; Akk; WENNS(ISTZAHL(ARABISCH(tx)); tx; ISTZAHL(-LINKS(tx; 1)); KLEIN(tx); WAHR; GROSS2(tx))))))
Resultat: Hornady Custom Grade Series III 2-tlg Matrizensatz 5,45x39/.221
Anmerkung:
Ich habe die Funktion ARABISCH() verwendet. Diese ist leider etwas abenteuerlich unterwegs. So liefert sie zB. ARABISCH("XVIIV") = 18
Folgende REGEXTESTEN-Funktion, falls sie bereits verfügbar ist, ergibt für den Zahlenbereich 1-89 (bzw. I - LXXXIX) zuverlässige Ergebnisse:
REGEXTESTEN(tx; "^(XL|L?X{0,3})?(IX|IV|V?I{0,3})$")
Obige Formel würde dann lauten:
=LET(txt; TEXTTEILEN($A$1; " "); REDUCE(""; txt; LAMBDA(Akk; tx; TEXTVERKETTEN(" "; 1; Akk; WENNS(REGEXTESTEN(tx; "^(XL|L?X{0,3})?(IX|IV|V?I{0,3})$") ; tx; ISTZAHL(-LINKS(tx; 1)); KLEIN(tx); WAHR; GROSS2(tx))))))
in A1: HORNADY CUSTOM GRADE SERIES III 2-TLG MATRIZENSATZ 5,45X39/.221
mit folgender Formel sollte auch eine korrekte Konversion erfolgen:
=LET(txt; TEXTTEILEN($A$1; " "); REDUCE(""; txt; LAMBDA(Akk;tx; TEXTVERKETTEN(" "; 1; Akk; WENNS(ISTZAHL(ARABISCH(tx)); tx; ISTZAHL(-LINKS(tx; 1)); KLEIN(tx); WAHR; GROSS2(tx))))))
Resultat: Hornady Custom Grade Series III 2-tlg Matrizensatz 5,45x39/.221
Anmerkung:
Ich habe die Funktion ARABISCH() verwendet. Diese ist leider etwas abenteuerlich unterwegs. So liefert sie zB. ARABISCH("XVIIV") = 18
Folgende REGEXTESTEN-Funktion, falls sie bereits verfügbar ist, ergibt für den Zahlenbereich 1-89 (bzw. I - LXXXIX) zuverlässige Ergebnisse:
REGEXTESTEN(tx; "^(XL|L?X{0,3})?(IX|IV|V?I{0,3})$")
Obige Formel würde dann lauten:
=LET(txt; TEXTTEILEN($A$1; " "); REDUCE(""; txt; LAMBDA(Akk; tx; TEXTVERKETTEN(" "; 1; Akk; WENNS(REGEXTESTEN(tx; "^(XL|L?X{0,3})?(IX|IV|V?I{0,3})$") ; tx; ISTZAHL(-LINKS(tx; 1)); KLEIN(tx); WAHR; GROSS2(tx))))))
Mit lieben Grüßen
Anton.
Windows 10 64bit
Office365 32bit
Anton.
Windows 10 64bit
Office365 32bit