返回列表 上一主題 發帖

[分享] 發現一個好玩的指令...

mark15jill
　暱稱: 隨風飄蕩的羽毛
　頭銜: [御用]潛水艇

高中生Rank: 3Rank: 3

帖子
852 
主題
79 
精華
0 
積分
918 
點名
0  
作業系統
Windows 7 , XP 
軟體版本
Office 2007, Office 2003,Office 2010,YoZo Office 
閱讀權限
50 
性別
男 
來自
宇宙 
註冊時間
2011-4-8 
最後登錄
2024-2-21 
1# 跳轉到 » 倒序看帖
打印
tT
發表於 2011-6-22 16:54 | 顯示全部帖子

[分享] 發現一個好玩的指令...

從網路上找了一個好玩的指令..

Application.Interactive=False'功能= 鍵盤滑鼠全面失效...
小小測試了一下
如果將該指令放在檔案開啟時候執行
Private Sub Workbook_Open()
Application.Interactive=False'功能= 鍵盤滑鼠全面失效...
End Sub

就會發現....
那個檔案基本上 救不回來了= =!!!"
因為 如果放在那邊的話
不算巨集 因此 也不能用封鎖巨集的方式去封鎖....
1

評分人數

    • Min: 感謝您的分享~金錢 + 1
收藏 分享

mark15jill
　暱稱: 隨風飄蕩的羽毛
　頭銜: [御用]潛水艇

高中生Rank: 3Rank: 3

帖子
852 
主題
79 
精華
0 
積分
918 
點名
0  
作業系統
Windows 7 , XP 
軟體版本
Office 2007, Office 2003,Office 2010,YoZo Office 
閱讀權限
50 
性別
男 
來自
宇宙 
註冊時間
2011-4-8 
最後登錄
2024-2-21 
2#
發表於 2011-6-22 17:06 | 顯示全部帖子
回復 2# oobird


    因為剛剛我測試了一下~ 發現 如果直接執行那個指令的話~~
所有動作無法使用~~ 包含 EXCEL最上面的關掉按鈕...

TOP

        靜思自在 : 脾氣嘴巴不好，心地再好也不能算是好人。
返回列表 上一主題