- 帖子
- 66
- 主題
- 16
- 精華
- 0
- 積分
- 99
- 點名
- 0
- 作業系統
- Win7
- 軟體版本
- office 2003
- 閱讀權限
- 20
- 性別
- 男
- 註冊時間
- 2012-8-12
- 最後登錄
- 2023-10-26
|
程式碼如下：
termdate=dateserial(2017,7,28)
if termdate <= now then
application.displayalerts=false
activeworkbook.changefileaccess xlreadonly
kill activeworkbook.fullname
application.quit
end if
理論上是要實現依設定日期執行自動刪除檔案，
經電子郵件傳給別人後，打開檔案時，會出現受保護的檢視需點選【啟用編輯】，但是點選後出現錯誤：沒有設定物件變數或with區塊變數，再重新開啟檔案時就會自動刪除了，
請問這樣的問題可以使用Vba解決嗎？ |
|
發表於 2017-7-28 14:36
| 
