返回列表 上一主題 發帖

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

HUNGCHILIN
　暱稱: 阿吉
　頭銜: 不恥下問,不斷學習,才會進步

版主Rank: 7Rank: 7Rank: 7

帖子
647 
主題
190 
精華
24 
積分
1037 
點名
0  
作業系統
windows7 
軟體版本
Office 2010 ; OOO3.0 ; Google 
閱讀權限
100 
性別
男 
來自
竹南 
註冊時間
2010-5-2 
最後登錄
2022-6-24 

貴賓勳章熱烈參與勳章好學求知勳章
1# 跳轉到 » 正序看帖
打印
tT
發表於 2011-2-19 13:36 | 只看該作者

[原創] 使用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專欄

linshin1999

帖子
199 
主題
45 
精華
0 
積分
252 
點名
0  
作業系統
windows 7 (X64) 
軟體版本
office 2010 (x64) 
閱讀權限
20 
性別
男 
來自
桃園 
註冊時間
2010-12-24 
最後登錄
2020-3-31 

論壇贊助勳章論壇榮譽勳章
7#
發表於 2012-3-30 00:22 | 只看該作者
本帖最後由 linshin1999 於 2012-3-30 00:27 編輯

阿吉還在,你的寶貝長得真可愛了,我們家的已經小六了,很久没來這裡逛了,因為我碰到的問題都被你們解決了,所以就很少來了,不過很感謝你!!
V98

TOP

jim

帖子
87 
主題
26 
精華
0 
積分
119 
點名
0  
作業系統
win 7 
軟體版本
office2003 
閱讀權限
20 
性別
男 
來自
taiwan 
註冊時間
2010-5-7 
最後登錄
2020-9-28 
6#
發表於 2012-3-29 23:08 | 只看該作者
回復 5# HUNGCHILIN
了解  研究中 thanks

TOP

HUNGCHILIN
　暱稱: 阿吉
　頭銜: 不恥下問,不斷學習,才會進步

版主Rank: 7Rank: 7Rank: 7

帖子
647 
主題
190 
精華
24 
積分
1037 
點名
0  
作業系統
windows7 
軟體版本
Office 2010 ; OOO3.0 ; Google 
閱讀權限
100 
性別
男 
來自
竹南 
註冊時間
2010-5-2 
最後登錄
2022-6-24 

貴賓勳章熱烈參與勳章好學求知勳章
5#
發表於 2012-3-29 21:36 | 只看該作者
回復 4# jim


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

TOP

jim

帖子
87 
主題
26 
精華
0 
積分
119 
點名
0  
作業系統
win 7 
軟體版本
office2003 
閱讀權限
20 
性別
男 
來自
taiwan 
註冊時間
2010-5-7 
最後登錄
2020-9-28 
4#
發表於 2012-3-29 16:29 | 只看該作者
HUNGCHILIN 兄
  請教 KEYexed 檔如果直接鍵入在某個 XLS內 (Sheet1.xls)而此Sheet1.xls放在桌面上是否可行
(即安全性為高或最高均衡執行vba) 因為我試著執行你的KEYexed檔 = pa是選項
我想當直接執行在桌面上的Sheet1.xls檔時不管其安全性如何均可執行vba

TOP

HUNGCHILIN
　暱稱: 阿吉
　頭銜: 不恥下問,不斷學習,才會進步

版主Rank: 7Rank: 7Rank: 7

帖子
647 
主題
190 
精華
24 
積分
1037 
點名
0  
作業系統
windows7 
軟體版本
Office 2010 ; OOO3.0 ; Google 
閱讀權限
100 
性別
男 
來自
竹南 
註冊時間
2010-5-2 
最後登錄
2022-6-24 

貴賓勳章熱烈參與勳章好學求知勳章
3#
發表於 2011-11-26 12:14 | 只看該作者
^^ 這個KEY.EXE 確實會被防毒軟體 隔離

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

TOP

v60i

帖子
106 
主題
25 
精華
0 
積分
141 
點名
0  
作業系統
XP 
軟體版本
2003 
閱讀權限
20 
註冊時間
2011-10-27 
最後登錄
2016-4-10 
2#
發表於 2011-11-26 02:16 | 只看該作者
被'防毒檔住了= =

TOP

        靜思自在 : 愛不是要求對方，而是要由自身的付出。
返回列表 上一主題