打開VBA編輯器
在ThisWorkbook插入下面的代碼
可以實作,目前日期超過11月13日的時候,自動清空A1:M15的内容
Private Sub Workbook_Open()
If CDate(Date) > CDate("2012-11-13") Then
sheet1.range("a1:M15")= ""
End If
End Sub
打開VBA編輯器
在ThisWorkbook插入下面的代碼
可以實作,目前日期超過11月13日的時候,自動清空A1:M15的内容
Private Sub Workbook_Open()
If CDate(Date) > CDate("2012-11-13") Then
sheet1.range("a1:M15")= ""
End If
End Sub