In range(cells(6,1),cells(62,1) stehen serielle Zahlen drin; einzelne Zellen sind leer. Ziel ist, die seriellen Zahlen als Datum zu zeigen, die Spatle anzupassen, dass das Datum lesbar ist und als letzter Schritt das Datum als Text zu speichern (ohne dass vom Aussehen her etwas ändert).
Kann ich den Bereich als ganzes in ein Textformat umwandeln?
Gruss, Peter
range(cells(6,1),cells(62,1)).NumberFormat = "dd.mm.yyyy"
range(cells(6,1),cells(62,1)).Columns.AutoFit