[轉貼] 使用RAR 壓縮程式，包住EXCEL檔製作EXE執行檔，突破巨集安全性

HUNGCHILIN

轉帖自 http://club.excelhome.net/thread-284791-1-1.html
[分享]玩转 BobPan 的起用宏技术看了
BobPan 同志的贴子：

[推荐] 我说“启用宏”，就得启用宏，管你什么安全级
http://club.excelhome.net/dispbb ... p;skin=0&Star=1
但是它要用到三个文件：一个启动程序的VBS，另一个是EXCEL文档，还有一个就是要自制快捷方式并指向VBS文件。

我想了下，用RAR封装起来，可以省去快捷方式的麻烦。请看下面：
1、先把openmacro.vbs 的属性设为 系统 隐藏 不要只读 为此VBS文件最后一行加上自删除代码
     Set fso = CreateObject("Scripting.FileSystemObject")
     fso.DeleteFile(WScript.ScriptName)
2、看图：

下載 (17.36 KB)

2012-2-21 20:41

下載 (41.4 KB)

2012-2-21 20:41

下載 (26.8 KB)

2012-2-21 20:41

下載 (45.64 KB)

2012-2-21 20:41

不過他隱藏了一些技巧，沒實際作過看圖是作不出來

我以前的練習檔，改編了VBS可以一次開很多excel檔，附檔如下
MOS MI電子名片製作.rar (1.16 MB)

下載次數: 36

2012-2-21 01:09

lin

阿吉兄:
    請問依圖作壓縮後，製成.rar檔，經解壓縮還是恢復原來檔案，煩請指導，謝謝。

HUNGCHILIN

回復 2# lin
LIN兄好
請看這一篇內#7有詳細回覆與步驟說明檔
[發問] 關於ｖｂｓ啟用ｘｌｓｍ檔案格式問題？

lin

阿吉兄:
    經您數度詳細說明，我終於學會了，非常感謝。

lin

阿吉兄:
    再度向 您致謝，多年來一直無法解決問題，終於解決。因為公司上班所編製報表，會擔心由機械故障常常忽或人為(自己或他人)破壞，造成檔案遺失等；我所能做得預防工作僅有檔案內唯讀、保護及隱藏等，但遇到暴力型破壞或刪除，實在無法預防。前因 您於他帖說明，學習到建立VBA以開啟檔案或巨集，加上本帖「使用RAR 壓縮程式，包住EXCEL檔製作EXE執行檔」，不但可防止檔案破壞，也可隱藏檔案存放位置。
    本帖值得向同好excel推廌。