Datum und Zeit - Abhängig
07.05.2002 17:26:41
Peter
Dat = Date
If Dat < DateSerial("2002", "05", "25") Then
MsgBox "Nitschewo!!!"
ActiveWorkbook.Close
End If
End Sub
klappt !! - Danke
ich habe es versucht auch noch eine bestimmte Zeit "14:00:00" vorzugeben, habe es aber mit TimeSerial nicht hinbekommen - ich kann mir aber auch vorstellen das der Makro jetzt ganz anders aussieht, oder ... ?!?!
Im voraus Danke