讓Excel工作簿中宏自動(dòng)運(yùn)行的兩種方法

1、啟動(dòng)Excel并打開(kāi)包含宏的工作表，在“開(kāi)發(fā)工具”選項(xiàng)卡的“代碼”組中單擊“宏”按鈕打開(kāi)“宏”對(duì)話框，單擊“編輯”按鈕打開(kāi)VBA編輯器窗口，如圖1所示。在代碼窗口中將原有的過(guò)程名更改為"Auto_Open"，如圖2所示。切換到Excel窗口，再次打開(kāi)“宏”對(duì)話框，可以看到宏的名稱已經(jīng)改變，如圖3所示。保存該文檔，當(dāng)再次打開(kāi)該文檔時(shí)，宏將自動(dòng)運(yùn)行。

圖1　單擊“編輯”按鈕

圖2　修改過(guò)程名

圖3　宏名稱發(fā)生改變

2、在“開(kāi)發(fā)工具”選項(xiàng)卡的“代碼”組中單擊"Visual Basic"按鈕打開(kāi)VBA編輯器，在工程資源管理器窗口中雙擊"Sheet1(Sheet1)"選項(xiàng)，如圖4所示。在打開(kāi)的代碼窗口的“對(duì)象”下拉列表中選擇"Worksheet"選項(xiàng)，在“事件”下拉列表中選擇"Activate"選項(xiàng)，在Activate事件代碼中添加宏過(guò)程名，如圖5所示。保存文檔，這樣當(dāng)工作表被激活時(shí)宏將自動(dòng)執(zhí)行。

圖4　雙擊

圖5　選擇對(duì)象和事件并輸入代碼

提示

Auto_Open過(guò)程是一個(gè)特殊的自定義Sub過(guò)程，其包含的代碼可以在工作簿打開(kāi)時(shí)自動(dòng)執(zhí)行，宏過(guò)程寫(xiě)入其中當(dāng)然也將被自動(dòng)調(diào)用執(zhí)行。Worksheet對(duì)象的Activate事件是在工作表被激活時(shí)觸發(fā)，在該事件代碼中調(diào)用宏過(guò)程將使工作表被激活時(shí)宏被啟用。