Wert aus Zelle trennen

[omron2003]

Hallo Forum,

ich habe in den Zellen der Spalte A folgende Wert Kombinationen stehen,
aus denen ich die Zahlen vor und nach dem x oder X in die Zellen daneben Spalte B und Spalte C trennen möchte.
Ich habe es schon mit diversen Hilfsspalten und Formeln probiert, bekomme aber kein befriedigendes Ergebnis.

Beispiel im Anhang.

Wär für Euere Hilfe und Tips Dankbar

Code:

CSF635G 1273x2232 (1)
CSF635G 930x3200 (3); WA
CSF600G 1670x2002 (4); WA
CSF600G 1370X2732 (12)
XPT333G 2067x3524 (11)
XPT420G 2067x1824 (7); WA
XPT014G 1067x1524 (12); WA
XPT014G 900x1200 (18); WA
XPT123G 1067x1650 (10); WA
XWH514G 1067x1524 (12)
UPS170 UL G 1067x1524 (140)
UPS114 UL G 1067x1524 (12)
UPS114 1270x2032 (8); WA
UPS114 920x1200 (18)

Besten Dank im Voraus
Omron2003

[Fennek]

Hallo,

es gibt sicher verschiendene Ansätze. Hier ein Pseudo-Code in VBA:

Code:

sub Zahlen
for i = 1 to cells(rows.count,1).end(xlup).row
tt = split(cells(i,1), "x")

cells(i,2) = val(mid(tt(0),len(strrev(tt(0)))))
cells(i,3) = val(tt(1))
next i
end sub

Wenn Du dich mit diesem Prinzip anfreunden kannst, kann der Code fertiggestellt werden.

mfg

(ungeprüft)

[LCohen]

neues Excel:
B1: =--TEIL(WECHSELN(GLÄTTEN(TEIL(
WECHSELN(KLEIN(A1);" ";WIEDERHOLEN(" ";10));SUCHEN("(";
WECHSELN(KLEIN(A1);" ";WIEDERHOLEN(" ";10)))-25;25))
;"x";WIEDERHOLEN(" ";19));{1.20};19)

altes Excel:
B1[:C1]: =--TEIL(WECHSELN(GLÄTTEN(TEIL(
WECHSELN(KLEIN($A1);" ";WIEDERHOLEN(" ";10));SUCHEN("(";
WECHSELN(KLEIN($A1);" ";WIEDERHOLEN(" ";10)))-25;25))
;"x";WIEDERHOLEN(" ";19));SPALTE(A1)*19-18;19)

[omron2003]

Hallo,

Super, die Formel funktioniert und gibt mir die Zahl vor dem x aus,
was müsste ich hier Ändern das die Zahl nach dem x ausgegeben wird?
Welche Funktion haben die einzelnen Zahlen in der Formel?

Code:

=TEIL(WECHSELN(GLÄTTEN(TEIL(
WECHSELN(KLEIN(A1);" ";WIEDERHOLEN(" ";10));SUCHEN("(";
WECHSELN(KLEIN(A1);" ";WIEDERHOLEN(" ";10)))-25;25))
;"x";WIEDERHOLEN(" ";19));{1.20};19)

[LCohen]

B1[:C1]: ist - eigentlich verständlich! - eine Ausfüllanweisung! Die Zahlen sind angemessene Konstanten.

Du hast die nicht für Dich gedachte Formel verwendet.

[omron2003]

Hallo,

Das mit VBA hört sich ja auch sehr gut an,

ich nehme an der Code müsste in ein Allgemeines Modul eingefügt werden?
Für die Umsetzung benötige ich aber wahrscheinlich noch weitere Hilfe.

Gruß
Omron2003

[omron2003]

Super, jetzt funktioniert es.

Nochmals besten Dank für die schnelle Hilfe.

LG Omron2003

[omron2003]

Hallo Zusammen,

ich benötige nochmals Hilfe,
wie könnte ich zusätzlich noch aus den Werten die gelb markierten Bereiche (siehe Anhang) in eine andere Zelle spliten?
Probleme machen mir solche Einträge wie (UPS170 UL G)

Besten Dank im Voraus
LG Omron2003

[LCohen]

=
WECHSELN(LINKS(A1;SUCHEN("(";A1)-2);GLÄTTEN(RECHTS(
WECHSELN(LINKS(A1;SUCHEN("(";A1)-2);" ";WIEDERHOLEN(" ";19));19));)