Stringprobleme
28.09.2006 11:49:30
avd
meisten Rechnern tadelloss funktioniert und auf einigen wenigen nicht.
Dim strDat As String
Dim pfad As String
Dim name As String
strDat = Replace(Replace(Replace(CStr(Now), ":", ""), ".", ""), " ", "_")
ActiveSheet.Range("K3") = strDat
Danke
Alex