Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
2024to2028
2024to2028
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Anzeige
Inhaltsverzeichnis

Excel VBA - Text-Inhalte in Zahlen umwandeln

Forumthread: Excel VBA - Text-Inhalte in Zahlen umwandeln

Excel VBA - Text-Inhalte in Zahlen umwandeln
27.02.2026 00:44:21
Stefan
Hallo,

ich habe eine Auswertung aus einer Datenbank, die in einer Excel-Datei gespeichert wird. Das Auswertungsprogramm macht aus allen Angaben in Excel nur Texte. Dadurch sind die Werte alle linksbündig und mit einem gelben Hinweis markiert, ob man den Text in eine Zahl umwandeln möchte.

Diese Werte sind aber eigentlich Geldbeträge die ich gerne in Euro umwandeln möchte. Alle Werte befinden sind in der Spalte F.

Ich habe für die Umwandlung folgende Code: 

Sub TextInZahlUndEuro()

    With Range("F2")

        ' Text in Zahl umwandeln

        .Value = CDbl(.Value)

       

        ' Als Euro formatieren

        .NumberFormat = "#,##0.00 €"

    End With

End Sub


Das Problem ist, dass immer nur die eine Zelle geändert wird (F2) auf die im Code Bezug genommen wurde.

Ich möchte aber gerne alle Felder nacheinander durchgehen, die in der Spalte F vorhanden sind.

Hat jemand eine Idee, wie ich alle Zellen nacheinander mit dem o.g. Code formatieren kann?

Vielen Dank
Stefan
Anzeige

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Excel VBA - Text-Inhalte in Zahlen umwandeln
27.02.2026 05:16:10
RPP63
Moin!
Ich kenne zwei einfache Varianten:
• Spalte markieren, Text in Spalten, sofort fertigstellen
• eine leere Zelle kopieren, Spalte markieren, Inhalte einfügen, Vorgang: addieren

Mein extrem umfangreiches Makro geht davon aus, dass die Zelle RPP63 ;-) leer ist. 
Sub Text_in_Zahl()

Range("RPP63").Copy

Columns("F").PasteSpecial Operation:=xlAdd

Application.CutCopyMode = False

End Sub


Gruß Ralf
Anzeige
AW: Excel VBA - Text-Inhalte in Zahlen umwandeln
28.02.2026 09:39:26
RPP63
Auch wenn Stefan das Interesse verloren hat?
Der Hinweis von Uwe ist natürlich wichtig und sollte im Vorgriff geprüft werden.
Ich gehe davon aus, dass Du diese "kaputte" Datei (als .xlsx) bereits vorliegen hast.
Mein obiger Vorschlag war pragmatisch und ist sehr schnell, hat aber wenig mit Deiner eigentlichen Frage zu tun.
Um Deinen Rekordercode auf einen Bereich anzuwenden, musst Du durch die entsprechenden Zellen iterieren: 
Sub Textzahlen()

Dim c As Range

With Range("F:F")

  .NumberFormat = "#,##0.00 €"

  For Each c In .SpecialCells(xlCellTypeConstants)

    If IsNumeric(c) Then c.Value = c.Value

  Next

End With

End Sub

Diese Schleife kann in sehr großen Bereichen zeitkritisch sein.

Gruß Ralf
Anzeige
AW: Excel VBA - Text-Inhalte in Zahlen umwandeln
28.02.2026 14:42:17
Stefan
Hallo Ralf,

vielen Dank für deine Antworten, leider hatte ich in den letzten Tagen sehr viel zu tun und kann daher erst jetzt antworten.

Dein 2. Vorschlag hat mir sehr gut geholfen, vielen Dank für die super Lösung.

Schöne Grüße
Stefan
AW: Excel VBA - Text-Inhalte in Zahlen umwandeln
27.02.2026 10:24:48
Alwin Weisangler
Hallo Stefan,

ich würde mal einfach vermuten, dass die Ausgabe aus deiner Datenbank eine CSV Datei ist und du Diese dann mit Excel öffnest. CSV Dateien sind natürlich nur Text.
Importiere die CSV statt zu öffnen unter Daten-->Daten abrufen-->aus Datei-->Aus Text/CSV. Da werden Textzahlen als Zahlen erkannt und als echte Zahlen ausgeben lassen. Ist es in einer Spalte mal ein Mix muss man ggf. nachhelfen.

Gruß Uwe
Anzeige
AW: Excel VBA - Text-Inhalte in Zahlen umwandeln
28.02.2026 14:14:08
Stefan
Hallo Uwe,

vielen Dank für deine Antwort.

Es wurde wirklich eine xlsx-Datei generiert, dass es zu Probleme beim CSV-Dateien kommen kann hatte ich schon vorher gehört. Ich werde mir die Lösung von Ralf anschauen.

Schöne Grüße
Stefan
AW: Excel VBA - Text-Inhalte in Zahlen umwandeln
28.02.2026 15:44:04
Alwin Weisangler
Hallo Stefan,

öffne doch einfach mal die xlsx mit einem Texteditor. Ich vermute mal, dass da HTML dahintersteckt. Es mag sicherlich Systeme geben die echte Excel Dateien (als Container) erzeugen. Meist steckt da aber anderes Zeugs dahinter, da Excel recht viele Sachen ohne zu murren einfach öffnet.

Dann kann man immer noch diese xlsx über ein passendes Importformat importieren und ist das Problem mit Textzahlen sofort los. Klar mit VBA kann man dies im Nachgang auch noch regeln.

Gruß Uwe
Anzeige

Forumthreads zu verwandten Themen

Excel VBA, Formatierung und Suche
Stefan
Hallo Herber Gemeinde,

ich habe folgendes Problem:

im Tabellenblatt Kundenliste (Tabellenbezeichnung "Kunden"), in Spalte J ab Zeile 5 steht eine Zahl von 1-4 oder UVV drin,
diese Spalte J habe ich schon in "Text, Standard oder Zahlen Formatieren lassen von VBA" ich bekomme da...
19.09.2024 23:31:25
Thread-ID: 1991500
2 Beiträge
Zeilen ausblenden und zellen formatieren
Tom

Hallo ihr alle,
ich würde gerne folgendes realisieren und habe selbst zu wenig wissen dafür.
Excel Tabelle
Ab zeile 6 (inklusiv) bis zeile 155 (inklusiv)
1. Immer aktiv im Hintergrund mit VBA
wird in spalte b etwas eingetragen, so sollen die zellen spalte b und c in der je...
14.06.2010 12:47:10
Thread-ID: 1161707
7 Beiträge
Schleife für Kopieren von Zellinhalten aus 12 Monatsblättern
Skriptyger
Guten Tag an alle VBA-Gurus, Excel-Profis und Helfer in der Not,

je länger ich mit Excel arbeitet, desto mehr merke ich, wie wenig ich davon beherrsche. Daher suche ich heute euren Rat. Dieses Forum und Archiv sind so riesig, dass es vielleicht schon eine Lösung gibt, die ich nicht gefunden...
17.11.2024 01:48:02
Thread-ID: 1996899
14 Beiträge
Autofilter Quelldaten in Zahl umwandeln
Christina
Hallo!
Ich habe einen VBA-Code mit einem Autofilter, bei dem die Daten leider nichts als Zahlen in die Zieldatei eingefügt werden, sondern als Text und somit funktionieren die Formeln, die mit den Datenzellen verknüpft sind leider nicht.
In Quelldatei sind die betreffenden Zellen mit einem g...
05.11.2021 14:55:25
Thread-ID: 1855234
2 Beiträge
VBA: nochmals Hochkomma entfernen
WalterK

Hallo,
Ich bringe bei meinen importierten Texten die Hochkommas nicht weg. Habe die Frage vorgestern schon gestellt und von ransi auch eine Antwort erhalten und glaubte auch, dass es funktionierte. Dem ist aber nicht so.
Das Problem ist bei meinem Codebeispiel in den Bereichen 3 und 4:...
30.10.2010 21:04:24
Thread-ID: 1184548
6 Beiträge
Formatierung und Eigabebestätigung
Michael

Hallo liebe Excel VBA Spezialisten,
ich verzweifele hier leider.
1.Ich habe mit folgendem Befehl eine Textbox formatiert:
Private Sub txtEraMitarbeiter_Change()
FormularMitarbeiter.txtEraMitarbeiter.Value = Format(FormularMitarbeiter.txtEraMitarbeiter. _
Value, "###0.00 %")<...
26.03.2016 14:39:32
Thread-ID: 1484367
5 Beiträge
Anzeige
vba verketten/ resize mit " / " ohne Datum
willoserus

Hallo zusammen,
vor kurzem hat man mir hier geholfen das u.a. Makro zum laufen zu bringen. Danke nochmal. Allerdings möchte ich in der Zeile
Call VerkettenMitFormat(Zelle, Zelle.Offset(0, 2).Resize(1, 8), " / ")
mit dem " / " verketten. Problem: Verkettet werden Zahlenwerte von 0 bi...
22.08.2015 15:12:56
Thread-ID: 1443787
4 Beiträge
Formatierungsproblem beim Einlesen von csv-Dateien
Hornung
Hallo zusammen,
ich habe mir folgenden Code "gebastelt", der mir effektiv
1. eine *.csv-Datei einliest
2. diese so formatiert, dass mehrere Spalten entstehen (anstatt zuvor durch Komma getrennt in einer Spalte)
3. das Ganze in eine Datei "eingelesen.xls" im selben Dateipfad kopiert...
24.06.2015 23:48:21
Thread-ID: 1432929
7 Beiträge
Spaltenformatierung "springt"
Tim
Hallo zusammen,
ich habe eine Excel-Liste, in der täglich Eintragungen vorgenommen werden, Datei: https://www.herber.de/bbs/user/144625.xlsm
Entweder werden Einträge hinzugefügt, geändert oder gelöscht. Diese Liste wird dann mit VBA "geklont" in eine neue Datei, die dann per E-Mail verschic...
10.03.2021 15:34:42
Thread-ID: 1818921
1 Beitrag
Combobox - Datenausgabe ändern
Toddi

Hallo alle zusammen,
ich habe ein Problem mit der Ausgabe einer Combobox. Die Ausgabe erfolgt als Text-Format, jedoch benötige ich es im Zahlenformat um mit dem Wert in mehreren Formeln weiter arbeiten zu können. Wie kann ich das Format ändern oder die Combobox in meine Formeln eingeziehen?...
25.10.2007 11:46:01
Thread-ID: 919609
2 Beiträge
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Live-Forum - Die aktuellen Beiträge
Datum
Titel
14.05.2026 13:31:09
Zeichen ausblenden
14.05.2026 09:50:42
Makro für MacOs
13.05.2026 19:14:18
Gleichheitszeichen
13.05.2026 14:24:56
VBA Projekt Passwort automatisch eingeben
13.05.2026 08:49:41
Reale Berechnung ohne Nachkommawerte
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum