Wenn "cm" enthalten, dann Zelle überspringen

[mrtc]

Hallo,

wie löse ich Folgendes am besten?

Größen
120 cm
"12/10"
13 cm (60x50x30)

Ich möchte, dass es am Ende so steht:

120 cm
12/10 cm
13 cm (60x50x30)

Ich habe einige Zellen, die mit " versehen sind, damit Excel diese nicht in ein Datum umwandelt.

Ich habe es bisher mit Verketten versucht, also allen Zellen, noch ein " cm" angehängt:

120 cm cm
"12/10" cm
13 cm (60x50x30) cm
 und anschließend die " entfernt und "cm cm" durch "cm" ersetzt.


Jedoch habe ich dann das Problem, dass bei "13 cm (60x50x30) cm" dann zweimal "cm steht".

Wie könnte ich dies anders lösen?

[BoskoBiati]

Hi,

Code:

=WECHSELN(WECHSELN(A1;"""";" cm";2);"""";"")

[Fennek]

oder mit VBA:

Code:

Sub F_en()
lr = Cells(Rows.Count, 1).End(xlUp).Row
For i = 2 To lr
    If InStr(1, Cells(i, 1), Chr(34)) > 0 Then Cells(i, 1) = Replace(Cells(i, 1), Chr(34), "") & " cm"
Next i
End Sub

[mrtc]

Danke, hat perfekt funktioniert!