Konvertierung Text in Zahl

Hallo,
kennt jemand eine Möglichkeit mit der man einen Text (der ganz offensichtlich ausschließlich aus Ziffern besteht) in eine (gleich aussehende) Zahl umzuwandeln kann???

Danke schonmal.

Gruß

Hallo,

Hallo Reiner,

kennt jemand eine Möglichkeit mit der man einen Text (der ganz
offensichtlich ausschließlich aus Ziffern besteht) in eine
(gleich aussehende) Zahl umzuwandeln kann???

lass mal dieses Makro über die markierten Zellen laufen:

Sub Text2Zahl()

 For Each Zelle In Selection
 With Zelle
 s = Zelle.Value
 If s "" And IsNumeric(s) Then
 s = s \* 1
 Zelle.Value = s
 End If
 End With
 Next Zelle
End Sub

Danke schonmal.

Bitte sehr - Viel Spaß

Gruß

moritzbock

Habe grade selber eine Möglichkeit gefunden.

  1. Neben dem betreffenden Feld ein Feld einfügen
  2. Neues Feld zahlengerecht formatieren
  3. Formel in dieses Feld: =(0+„betreffendes Feld“)
  4. Neues Feld kopieren und „Inhalte einfügen“ -> Werte.
  5. altes Feld löschen.

[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]

Danke -
entspricht ja in etwa meiner selbstgefundenen Lösung …
nur als praktisches Makro :o)

Gruß

[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]

kennt jemand eine Möglichkeit mit der man einen Text (der ganz
offensichtlich ausschließlich aus Ziffern besteht) in eine
(gleich aussehende) Zahl umzuwandeln kann???

Hi Reiner,
schreib eine 1 in eine beliebige Zelle, diese zelle mit Strg+C kopieren, dann markiere die Zellenbereiche wo die unechten Zahlen stehen und Bearbeitn–InhalteEinfügen–Multiziplieren.
Gruß
Reinhard

WERT(Text)
…heißt die passende Funktion. Statt dem Text kannst Du natürlich auch einen Bezug auf eine andere Zelle angeben.

Gruß, Dennis

[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]