Datum in Textstring wandeln ???

Bild

Betrifft: Datum in Textstring wandeln ???
von: ralf
Geschrieben am: 12.10.2003 10:53:39

Hallo zusammen !
Ich bekommen täglich eine Tabelle welche eine Spalte mit Datumsangaben (im Format TT-MM-JJJJ)
enthält. Nun benötige ich jedes Datumsfeld aber unglücklicherweise als Textfeld.
Wandle ich dies per Formatierung in ein Textfeld um erhalte ich aber ganze Zahl z.B.
aus 10-09-2003 wurde 37874 ich benötige aber ein Textstring ....

Wer kann ir da helfen. ???

Das ganze sollte dann per Makro idealereise für die ganze Tabellenspalte in einem Rutsch passieren. Wer kann da helfen.......

Bild


Betrifft: AW: Datum in Textstring wandeln ???
von: PeterW
Geschrieben am: 12.10.2003 11:05:11

Hallo Ralf,

für Spalte A könnte das so aussehen:


Sub datum()
   Dim lgCount As Long
   For lgCount = 1 To Range("A65536").End(xlUp).Row
      Cells(lgCount, 1) = CStr(Cells(lgCount, 1))
   Next
End Sub


Gruß
Peter


 Bild

Beiträge aus den Excel-Beispielen zum Thema " Datum in Textstring wandeln ???"