返回列表 上一主題 發帖

一個保護問題,

回復 30# HUNGCHILIN

請問大大
只用 VBAProject 保護VBA 安全嗎?
50 字節以內
不支持自定義 Discuz! 代碼

TOP

本帖最後由 317 於 2011-1-3 07:46 編輯

回復 31# basarasy

如小妹先前發問, 停用巨集時什麼保護都是沒用, 或可按hsieh大gbkee大大的教導方法參考,,
但vba專案保護在停用巨集時, 其他人可以看到巨集保護下的工作表, 程式區還是沒能看到,,

TOP

回復 32# 317


    可能我表達不好.  
我是問 只用 VBAProject 保護VBA   ,VBA內的東西 安全嗎?
50 字節以內
不支持自定義 Discuz! 代碼

TOP

不知這篇是否在告訴我不要再寫保護保密帖?目前只寫到2/3.----------------------------------------- ...
HUNGCHILIN 發表於 2011-1-2 01:04

大師言重了~
對excel初學者的我來說,現在學保護保密的技巧還太早,
但在好奇心的驅使下,還是學了一些些,
因此,在不是很了解的情況下,對保護保密的目的產生許多的困惑。
就像先前我寫了一個成本試算,
為了工作表的美觀(初學者...落落長的公式讓人看了頭暈-.-")
我就現學現賣...
學人家把公式放在另一張工作表上,然後把它隱藏起來(如圖一二所示)
後來,當我學到更簡單的隱藏方式(如圖三)
就讓我很困惑...相同的作用,我又何必大費周章的繞了一大圈。

TOP

本帖最後由 HUNGCHILIN 於 2011-1-3 22:05 編輯

回復 33# basarasy

basarasy兄您好
這是個好問題也是大家持續討論多年的一個題目
從您上次在版上提出這問題已經四五個月,在嘗試與操作中是否有其他感想可以分享?

這次會再次詢問應該是有些使用上的心得,才會有這感慨

這問題舉個例子,在各大OFFICE網站 表面與實際上均不幫破解
但在網站中均會置放VBP破解軟體,有工作表,有工作簿,有VBP破解都有,當然麻辣也不例外

[原創] 簡易版的仿 VBA專案加解鎖器增益集

以此為例我们可以知道,VBP保護並不安全,只要得到各大網站上釋放的工具就可以破解。

有增加VBP防護的技巧嗎? 有 不只一個
技巧部份已經發揮在保護保密帖的部份檔案中了,就等待大家來挖掘...
Hung-Chi Lin/林宏吉
HUNGCHILIN/林宏吉的OFFICE專欄

TOP

回復 35# HUNGCHILIN

謝謝HUNGCHILIN大大的說明.
我以看過大大的保護保密帖.
有些下載後不知用法.
簡易版的仿 VBA專案加解鎖器增益集  只有 .xls, .xla, .xlt
我現在用的都是 .xlsx  .xlsm
期望HUNGCHILIN大大的VBA專案加解鎖器.
50 字節以內
不支持自定義 Discuz! 代碼

TOP

敢問可以只針對單一活頁開啟時做密碼保護嗎?其他活頁則可以正常使用....

TOP

好像跟我問的有關,可是看不懂,又不能下載檔案,我要加油了

TOP

若以廣義解釋,EXCEL保護方式很多:
檔案可以各種方式設定密碼,另外也可以設為唯讀,或於存檔時另存備份、隱藏檔案等
儲存格可設密碼保護,另外也可以隱藏、群組等
工作表可設密碼保護,另外也可以scrollarea、隱藏等
其實應視個別需要而決定使用方法
Lin

TOP

本帖最後由 infoverdad 於 2011-7-19 21:23 編輯

分享我已用在工作上的方法:
關閉檔案時將機密工作表隱藏
  1. Private Sub Workbook_BeforeClose(Cancel As Boolean)
  2. Sheets("首頁").Select
  3. Worksheets("Secret").Visible = 2
  4. Me.Save
  5. End Sub

  6. Private Sub Workbook_Open()
  7. Worksheets("Secret").Visible = 2
  8. If InputBox("請輸入密碼或取消") = "123" Then
  9.     MsgBox "USER,你好!!"
  10.     Worksheets("Secret").Visible = -1
  11.     Sheets("Secret").Cells.Font.ColorIndex = 56
  12. Else
  13.     'MsgBox "你好!!"
  14.     Sheets("Secret").Cells.Font.ColorIndex = 2
  15.     Worksheets("Secret").Visible = 2
  16. End If
  17. End Sub
複製代碼
打開檔案提示KEY入密碼"123",則"SECRET"工作表會出現
若不輸入密碼,則"SECRET"工作表會繼續被隱藏,且無法用取消隱藏的方式打開!

TOP

        靜思自在 : 地上種了菜,就不易長草;心中有善,就不易生惡。
返回列表 上一主題