Wer kann mir sagen warum der nachfolgende Befehl auf den
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