返回列表 上一主題 發帖

保护工作表

保护工作表

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

eg.把工作表放在 C:\桌面  才可以用    把工作表放在 (C:\其他地方  D:\ ) 不能用
有冇有方法可以這樣保& ...
basarasy 發表於 2010-7-15 23:40


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

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

  4. End Sub
複製代碼

TOP

回復 2# jackdream


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

TOP

        靜思自在 : 慈悲沒有敵人,智慧不起煩惱。
返回列表 上一主題