In einem meiner früheren Post habe ich bereits ein Makro hierfür gepostet ➡ Text in Zahlen umwandeln. Bei diesem Makro wird der zu formatierende Bereich dynamisch ermittelt. Es wird der Bereich A4 bis zu letzten beschriebenen Zelle in eine Zahl umgewandelt, anstatt dies manuell über den grünen Pfeil vorzunehmen, geht das bequem über das Makro.
Sub text_in_zahl()
'Das Makro wandelt Text in Zahlen um
Sheets("Tabelle1").Select
' Die letzte beschriebene Zelle wird ermittelt
Dim loletzte As Long
loletzte = ActiveSheet.UsedRange.SpecialCells(xlCellTypeLastCell).Row
With Range("a4" & ":a" & loletzte)
.NumberFormat = "General"
.Value = .Value
End With
End Sub
Möchte man die so umgewandelten Zahlen z.B. in ein datum umwandeln, könnt ihr dieses Makro nutzen:
Sub datum_formatieren()
' Formatiert Zahlen in das Datumsformat mm.dd.yyyy
'
Application.ScreenUpdating = False
Sheets("Tabelle1").Select
Dim loletzte As Long
loletzte = ActiveSheet.UsedRange.SpecialCells(xlCellTypeLastCell).Row
Range("a4" & ":a" & loletzte).Select
Range(Selection, Selection.End(xlDown)).Select
Selection.NumberFormat = "m/d/yyyy"
Application.CutCopyMode = False
End Sub
- Ignatz, Schels (Autor)
- 704 Seiten - 12.07.2019 (Veröffentlichungsdatum) - Markt + Technik Verlag (Herausgeber)
Seit Anfang des Jahrtausends absolut Linux-begeistert und Fan von Open Source. Raspberry Pi Bastler der ersten Stunde und nach wie vor begeistert von dem kleinen Stück Hardware, auf dem
er tolle Projekte umsetzt. Teilt hier seine Erfahrungen mit Nextcloud, Pi-hole, YubiKey und zu anderen spannenden IT-Themen. Nutzt
beruflich viel Excel. Sitzt vor einem riesen 49″ Monitor, nutzt Windows zum Arbeiten, Linux auf seinen Servern und virtuellen Maschinen und hört dabei Spotify und Musik über seinen RadioPi.
(**) Produktpreise und -verfügbarkeit sind zum angegebenen Datum / Uhrzeit korrekt und können sich ändern. Alle Preis- und Verfügbarkeitsinformationen auf https://www.amazon.de/ zum Zeitpunkt des Kaufs gelten für den Kauf dieses Produkts.
Vielen Dank dieser Artikel ist sehr hilfreich
Toll! Funktioniert aber nur mit ganzen Zahlen… Was müsste man ergänzen, damit das Dezimalkomma erkannt wird?