標題: 請問巨集問題 [打印本頁]

---

作者: vance99    時間: 2012-10-20 18:30     標題: 請問巨集問題

我有兩個 excel 2007 寫的 EXCEL 巨集
A.xlsm   以及 B.xlsm
兩個檔案裡面都用 ctrl-shift-Z  去啟動 表單 (A.xlsm 為表單 A   , B.xlsm 為表單 B)

現在我開啟 A.xlsm 使用中  , 巨集中有一個功能是開啟 B.xlsm , 複製 B.xlsm 其中的  sheet1  到 A.xlsm 的 sheet2 中
然後關閉 B.xlsm

但是問題來了....
再次按下 ctrl-shift-z 時 , 啟動的不是表單 A , 卻是表單 B ... ?????

請問為何會這樣呢 ?

謝謝大家幫我想想... thanks

---

作者: GBKEE    時間: 2012-10-20 21:08

回復 1# vance99
A.xlsm 開啟,  B.xlsm 開啟 都用這樣  Application.OnKey的嗎?

1. Private Sub Workbook_Open()
   
2.     Application.OnKey "+^Z", "???"
   
3. End Sub

複製代碼

如果是:  巨集開啟 B.xlsm時, B.xlsm 的 Application.OnKey 會執行一次 , A.xlsm 的 OnKey 被蓋掉了
關閉 B.xlsm,後回到A.xlsm 沒有再 Application.OnKey 當然OnKey 是B.xlsm的.
所以A.xlsm 的ThisWorkbook 須加上這程序, 再 一次的 Application.OnKey才會是A.xlsm地.

1. Private Sub Workbook_WindowActivate(ByVal Wn As Window)
   
2.     Application.OnKey "+^Z", "???"
   
3. End Sub

複製代碼

---

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