Speichern & Zeitschleife
18.07.2003 16:09:52
Rieke
das speichern soll nur erfolgen, wenn das file auch geöffnet wurde. wenn es am mittwoch nicht geöffnet wurde, soll es auch nicht abgespeichert werden.
das ganze soll für alles "mittwochs" gelten.
geht das irgendwie?
ich hab bis jetzt nur das:
Private Sub Workbook_BeforeClose(Cancel As Boolean)
If Day(Date, vbMonday) Then
ActiveWorkbook.SaveCopyAs "\\Trha1\Agent\Friederike\Test\copy-" & ActiveWorkbook.Name & ".bac"
End If
End Sub
das speichert aber jedes mal wenn das file geöffnet wurde ab, egal welcher tag ist.