返回列表 上一主題 發帖

[發問] 試用期限

bowwow1975

帖子
38 
主題
14 
精華
0 
積分
66 
點名
0  
作業系統
Win7 
軟體版本
Excel2003 
閱讀權限
20 
性別
男 
註冊時間
2012-7-16 
最後登錄
2013-9-3 
1# 跳轉到 » 倒序看帖
打印
tT
發表於 2012-8-6 17:09 | 只看該作者

[發問] 試用期限

請問專家！！

有辦法在 VBA 裡撰寫使用期限嗎？
或是設定某個日期後無法打開？
收藏 分享

lalalada

帖子
102 
主題
17 
精華
0 
積分
129 
點名
0  
作業系統
windows 
軟體版本
2010 
閱讀權限
20 
性別
男 
註冊時間
2012-5-16 
最後登錄
2020-9-2 
2#
發表於 2012-8-6 17:41 | 只看該作者
在VBA編輯器裡的ThisWorkbook
插入
Sub Workbook_open()
"expression"
End Sub
expression那段是你寫入的程式碼
會在活頁簿開啟後自動執行
可以判斷日期是否超過某特定日(If date ....)
若超過看是想要開啟後上鎖出現警告視窗
或是自爆都可以....

TOP

HSIEN6001

帖子
219 
主題
24 
精華
0 
積分
243 
點名
0  
作業系統
Windows10 
軟體版本
Office2016 
閱讀權限
20 
性別
女 
註冊時間
2012-4-18 
最後登錄
2022-2-7 

論壇榮譽勳章論壇贊助勳章
3#
發表於 2012-8-6 20:12 | 只看該作者
回復 2# lalalada


    這還沒學過!才剛爬文到專案保護
得再找找相關資料了
謝謝提供思路~^__^~

TOP

lalalada

帖子
102 
主題
17 
精華
0 
積分
129 
點名
0  
作業系統
windows 
軟體版本
2010 
閱讀權限
20 
性別
男 
註冊時間
2012-5-16 
最後登錄
2020-9-2 
4#
發表於 2012-8-6 21:22 | 只看該作者
回復 3# HSIEN6001

專案保護比這個難多了!
讓他自爆倒是容易XD
我只會偷看別人的程式碼偷學...."

TOP

HSIEN6001

帖子
219 
主題
24 
精華
0 
積分
243 
點名
0  
作業系統
Windows10 
軟體版本
Office2016 
閱讀權限
20 
性別
女 
註冊時間
2012-4-18 
最後登錄
2022-2-7 

論壇榮譽勳章論壇贊助勳章
5#
發表於 2012-8-6 23:52 | 只看該作者
回復 1# bowwow1975


    請多利用右上方的功能鍵 [搜索]

經典：
http://forum.twbts.com/viewthread.php?tid=5722&from=favorites
http://forum.twbts.com/viewthread.php?tid=51&from=favorites

日期一到就刪除巨集　http://forum.twbts.com/viewthread.php?tid=4548&from=favorites
其他參考的也很多，你可先爬文試試：
http://forum.twbts.com/viewthread.php?tid=4899&from=favorites
http://forum.twbts.com/viewthread.php?tid=2116&from=favorites

ＰＳ：我也還在學，尚未融會貫通，先作收藏；再慢慢消化！　^皿^

TOP

        靜思自在 : 君子如水，隨方就圓，無處不自在。
返回列表 上一主題