例如我想到2013年3月2号後自动删除一个excel表格,在表格中建了个宏叫Macro1
具体如下:
Sub Macro1()
Private Sub Workbook_Open()
Application.DisplayAlerts = False
Dim datee As Date
datee = #3/2/2013#
If Date datee Then
ActiveWorkbook.ChangeFileAccess xlReadOnly
Kill Activ...[ 查看全文 ]