Re: In Datei schrieben
12.09.2002 10:16:02
Nikolaus
Hi, so kriegst Du schon mal das Datum in den Dateinamen rein (Du mußt die Doppelpunkte der Zeit rausparsen!)Mit dem Speichern zeichne doch einfach mal ein "Speichern unter" mit der Option "als Text" auf. Dann hast Du doch schon das meiste geschafft.
Guckst Du bitte mal in meinen Thread rein? Danke!
Nikolaus
Public Function Tab_Name_bauen() As String
'
'
Dim Datum As String
Dim Name As String
Datum = Now
For i = 1 To Len(Datum)
If Mid(CStr(Datum), i, 1) = ":" Then
Mid(Datum, i, 1) = "."
End If
Next i
Name = "Irgentwas-" + Datum + ".txt"
End Function