返回列表 上一主題 發帖

[原創] 使用VBA開啟另一個帶有檔案保護的EXCEL檔

[原創] 使用VBA開啟另一個帶有檔案保護的EXCEL檔

本帖最後由 HUNGCHILIN 於 2011-2-19 16:05 編輯

這一則是很簡單的一個小技巧與想法的實現

運用時機與想法:
1.檔案有設定保護密碼時,不想跟別人說密碼
2.檔案有設定保護密碼時,怕密碼忘記
3.檔案有設定保護密碼時,不想每次自己打密碼
紫微斗數排盤程式.part1.rar (1.43 MB)
紫微斗數排盤程式.part2.rar (1018.94 KB)
紫微斗數排盤程式KEY.rar (5.07 KB)

P.S.
4.KEY製成EXE檔時可讓KEY檔與KEY所開啟的檔案避開巨集安全設定
也是一個,檔案有設定保護密碼時,檔案避開巨集安全設定的一個方法

紫微斗數排盤程式KEYexed.rar (6.66 KB)

我們在ThisWorkbook 中輸入下列簡單程序就可完成
  1. Option Explicit
  2. Private Sub Workbook_Open()
  3. On Error GoTo ERROR1
  4. Dim pa As String
  5. pa = Application.GetOpenFilename
  6. Workbooks.Open Filename:=pa, Password:="11686106"
  7. ERROR1: ThisWorkbook.Close
  8. End Sub
複製代碼
Hung-Chi Lin/林宏吉
HUNGCHILIN/林宏吉的OFFICE專欄

^^ 這個KEY.EXE 確實會被防毒軟體 隔離

當然這個KEY 的VBA代碼已經 放上來了許久
我們可以隨時用EXCEL檔放入VBA代碼作一個新的KEY檔
只是沒有作成EXE檔
Hung-Chi Lin/林宏吉
HUNGCHILIN/林宏吉的OFFICE專欄

TOP

回復 4# jim


1.當然不可行.因為檔案密碼執行順序優先於vba
2.你研究一下這一則http://forum.twbts.com/viewthread.php?tid=5892&highlight=
3.或者可以使用 數位簽名功能
Hung-Chi Lin/林宏吉
HUNGCHILIN/林宏吉的OFFICE專欄

TOP

        靜思自在 : 要比誰更受誰.不要比誰更怕誰。
返回列表 上一主題