Ist das überhaupt möglich? Komplexe Liste

[hans2501]

Guten Abend Allerseits,

Folgende Frage/ Problem: 

Bei einer Liste mit über 1000 Zeilen muss ich bei den Größenangaben das Format ändern. 

Von ursprünglich 23, 5 cm x 5, 3 cm 

solll es auf folgendes Format umgewandelt werden

Length: 23.5cm , Height: 5.3cm 

Habe auch eine kleine Beispiel liste angefügt.

Meine Frage: 
Ist das überhaupt möglich? 

Für Antworten wäre ich sehr dankbar!

[Fennek]

Hallo,

teste mal diesen Code:

Code:

Dim Tx As String

For i = 2 To Cells(Rows.Count, 1).End(xlUp).Row
    Tx = Replace(Cells(i, 1), ",", ".")
    Tx = "Length: " & Split(Tx, "x")(0) & " Height: " & Split(Cells(i, 1), "x")(1)
    Cells(i, 5) = Tx
Next i

mfg

[Kuwer]

Hallo,

als Formel (in bspw. B2): ="Length: "&WECHSELN(WECHSELN(WECHSELN(A2;", ";",");",";".");"x";"Height:") und runterziehen.

Gruß Uwe

[rate mit]

Hallo,

Code:

="Length: "&WECHSELN(LINKS(A2;7);",";".")&WECHSELN(LINKS(TEIL(A2;9;1));"x";" Height: ")&WECHSELN(RECHTS(A2;6);",";".")

Ist das Leerzeichen in Zeile 17 bei 12, 5 cm ein Tippfehler oder Absicht?

[Huzzim]

Strg + H (suchen und ersetzen)