標題: [原創] 如何去除EXCEL VBA 中的 THISWORKBOOKS 與SHEET ? [打印本頁]

---

作者: HUNGCHILIN    時間: 2010-5-4 22:20     標題: 如何去除EXCEL VBA 中的 THISWORKBOOKS 與SHEET ?

本帖最後由 HUNGCHILIN 於 2012-1-4 23:29 編輯

這個檔案是阿吉在測試2007與其他版本相容性的時候測出來比較奇怪的檔案

P.S.技巧 共用活頁簿加密 之  a.製作特殊檔

其效果是:

1.EXCEL VBA 中的 THISWORKBOOKS 與SHEET 會消失不見

2.Excel課程-VBE 顯示1.xls 這個檔在2007版本時VB專案會顯示"專案鎖定不可見"

    但2007以下版本都可見

3.另存成2007檔案時不可存

大概可用在於限制EXCEL 程式不能使用THISWORKBOOKS 與SHEET 撰寫的時候

屬於雞肋並不實用瞭解有這怪東西就好了
無THISWORKBOOKS & SHEET 15-1.rar
無THISWORKBOOKS 15-2.rar

[attach]46[/attach]
[attach]47[/attach]
[attach]48[/attach]

---

作者: brabus    時間: 2010-12-20 15:14

這位大大
您的功夫太高了
有點沒辦法了解你的程式呢
不過我會加油去了解的

---

作者: GBKEE    時間: 2010-12-20 20:49

經我觀察 在 2003版是增益集  (我的版本是2003)
請打開 vba 視窗
Private Sub auto_Open()
MsgBox "這是 HUNGCHILIN 的作品" & "  (?体)我不是???的    :    (繁體)我不是來騙錢的"
ThisWorkbook.SaveAs "C:\阿吉.XLS"  '加入這一行  執行後 THISWORKBOOKS 與SHEET 會出現了
End Sub
增益集指令 ->按[瀏覽..] 可在 C:\ 阿吉.XLS  家入為增益集

---

作者: FAlonso    時間: 2010-12-25 13:55

希望樓主將來可以撰寫一些巿面書籍沒有提及的高級實用技術,積累成篇,讓會員們開開眼界
例如excel和外部程式結合等(這個版經常有關於DDE的題目),相信會更有趣

---

歡迎光臨 麻辣家族討論版版 (http://forum.twbts.com/)