Excel Probelm...Mehrere Zellen bearbeiten!

Question

Hallo,

ich habe eine Frage bezüglich einer Formatierung im Excel.

Also ich habe mehrer Zellen mit folgendem inhalt

1,25 m/s
5,8 C°
5,89 V

Und ich will die Buchstaben aus den Zellen bekommen. Im Moment mach ich das händisch aber es sind einfach zu viele.
Heißt ich muss in die zelle klicken die Buckstaben rauslöschen und dann wieder in die nächste Zelle etc.

KAnn mir da jem. weiterhelfen?

Answer 1

Hallo,

versuchs mal so

=--LINKS(A1;FINDEN(" ";A1)-1)

Die Werte stehen ab A1 abwärts, Formel in Zeile 1 einer beliebigen Spalte einfügen und runter ziehen.

Gruss
Rainer

Answer 2

Nee funk. leider nicht...steht dann 0

Answer 3

Hallo,

versuch es mal so

=LINKS(A1;FINDEN(" ";A1)-1)

für Zeile 1 und zwischen Zahl und Einheit muss ein Leerzeichen sein.

Andere Frage: Sind die Einheiten immer gleich, wiederholen die sich?


Gruß

Helmut

Answer 4

funkt auch leider nicht :(
jede Spalte selbe Einheit anderer Wert

Answer 5

Hallo liliii,

meine Formel funktioniert sehr wohl, wenn Deine Werte dort stehen, wie ich geschrieben habe.
Ansonsten must Du sie eben anpassen.

Oder schreibe noch mal genauer, wo Deine Werte stehen.

Gruss
Rainer

Answer 6

hi all :-)

ein beispiel

gruss nighty

Public Sub Beispiel()
Dim ZeilenA As Long
ZeilenA = Range("A" & Rows.Count).End(xlUp).Row
ReDim intArray(ZeilenA, 1) As Variant
intArray() = Range("A1:A" & ZeilenA)
For Index = 1 To ZeilenA
intArray(Index, 1) = SumZahlen(intArray(Index, 1))
Next Index
Range("A1:A" & ZeilenA) = intArray()
End Sub

Function SumZahlen(Zellen As Variant) As String
Dim Zelle As Range
Dim ArrZeichen As Integer
Dim SpaArr As String
For ArrZeichen = 1 To Len([Zellen])
If Mid([Zellen], ArrZeichen, 1) Like "[0-9,.]" = True Then
SumZahlen = SumZahlen & Mid([Zellen], ArrZeichen, 1)
End If
Next ArrZeichen
End Function

Answer 7

Hallo,

dann kannst du es auch so machen:

"Bearbeiten""Ersetzen..." dann "Suchen nach: Hier gibst du entsprechend dann "m/s" oder " m/s" ein und in erstetzen gibst du nichts ein.

Achtung Leerfelder sind auch Zeichen

Zum testen einzeln probieren dann kannst du auf "Alle suchen" wechseln, wenn es funktioniert. Den nächsten Durchgang dann mit der nächsten Textgruppe

Gruß

Helmut