多Sheet表快速操作提效

覃文成

標記關(guān)鍵字

打開待標記的文檔，先選中整個文檔，再單擊窗口“開始”選項卡，在“編輯”功能區(qū)，打開“查找和替換”對話框。在“查找內(nèi)容”輸入標記的關(guān)鍵字，切換至“替換”選項卡。單擊“高級”按鈕后，選擇“范圍”下的“工作薄”列表。然后，打開“替換格式”對話框，切換到“字體”選項卡，單擊“顏色”下拉按鈕，選擇某種調(diào)色板并確定后，單擊“全部替換”按鈕即可（圖1）。

導出Sheet表

打開有多個Sheet表的文檔，單擊窗口的“開發(fā)工具”選項卡，選擇“代碼”功能區(qū)中Visual Basic按鈕，進入VB窗口。單擊窗口的“插入→模塊”菜單，打開VB“模塊”窗口。把代碼復制到光標處，單擊“保存”即可（圖2）。返回至Excel 2013窗口，使用Alt+ F8快捷鍵，打開“宏”對話框。選擇“導出Sheet表”宏，運行后，該文檔的所有Sheet表保存為原文檔所處的路徑、文件名為原Sheet表的多個文檔。

合并Sheet表

運行Excel 2013后，進入VB窗口。依次單擊窗口的“插入→模塊”菜單，在VB“模塊”窗口下，把代碼粘貼至代碼窗口光標處，單擊“保存”即可（圖3）。回到Excel窗口后，按Alt+ F8鍵，打開“宏”對話框。選擇“合并Excel文件”宏，單擊“運行”按鈕，彈出文件選擇框，選擇所要合并的Excel文檔，確定后，文檔里的所有Sheet表會原封不動地合并到當前的工作簿中。

匯總Sheet表

打開要匯總的文檔，按Alt+F11鍵進入VB窗口。把代碼復制到代碼窗口，單擊“保存”按鈕即可（圖4）。在Excel窗口下，按下Alt+ F8快捷鍵，打開“宏”對話框。選擇“匯總Excel文件”宏，確定后，在當前工作簿下新建一個 “匯總表”的Sheet表，該“匯總表”包含當前文檔中所有Sheet表的內(nèi)容。endprint