返回列表 上一主題 發帖

保护工作表

basarasy

帖子
287 
主題
65 
精華
0 
積分
357 
點名
0  
作業系統
xp 
軟體版本
OFFIC 2007 
閱讀權限
20 
註冊時間
2010-6-4 
最後登錄
2015-8-19 
1# 跳轉到 » 倒序看帖
打印
tT
發表於 2010-7-15 23:40 | 只看該作者

保护工作表

eg.把工作表放在 C:\桌面  才可以用    把工作表放在 (C:\其他地方  D:\ ) 不能用
有冇有方法可以這樣保护工作表?
收藏 分享
50 字節以內
不支持自定義 Discuz! 代碼

jackdream
　暱稱: Jack

中學生Rank: 2

帖子
133 
主題
9 
精華
0 
積分
147 
點名
0  
作業系統
Win10 
軟體版本
Office 2010 
閱讀權限
20 
性別
男 
來自
高雄 
註冊時間
2010-5-1 
最後登錄
2024-11-11 
2#
發表於 2010-7-27 09:42 | 只看該作者
eg.把工作表放在 C:\桌面  才可以用    把工作表放在 (C:\其他地方  D:\ ) 不能用
有冇有方法可以這樣保& ...
basarasy 發表於 2010-7-15 23:40


放在 ThisWorkbook 裡面試試
  1. Private Sub Workbook_Open()

  3. '檔案路徑若不是在 桌面,則關閉此檔案
  4. If Not ThisWorkbook.Path Like "*桌面" Then ActiveWindow.Close

  6. End Sub
複製代碼

TOP

basarasy

帖子
287 
主題
65 
精華
0 
積分
357 
點名
0  
作業系統
xp 
軟體版本
OFFIC 2007 
閱讀權限
20 
註冊時間
2010-6-4 
最後登錄
2015-8-19 
3#
發表於 2010-7-27 19:30 | 只看該作者
回復 2# jackdream


    謝謝大大.
50 字節以內
不支持自定義 Discuz! 代碼

TOP

        靜思自在 : 君子立恆志，小人恆立志。
返回列表 上一主題