- 相關(guān)推薦
數(shù)據(jù)分類匯總,一鍵輕松搞定
對于大型的數(shù)據(jù)表要進(jìn)行分類匯總,以前我采用“自動篩選”的辦法來實現(xiàn)的,但這樣既麻煩,又容易出現(xiàn)錯誤。經(jīng)過摸索,發(fā)現(xiàn)用“宏”可以實現(xiàn)批量篩選和打印,一鍵搞定了分類匯總和打!
一、數(shù)據(jù)匯總
選中F1002單元格(此處假定有1000條數(shù)據(jù)),輸入公式:=SUBTOTAL(9,F3:F1002),確認(rèn)一下,統(tǒng)計出“面積”總和。然后再次選中F1002單元格,將鼠標(biāo)移至該單元格右下角,成細(xì)十字線狀時,按住左鍵向右拖拉至H1002單元格,將上述公式復(fù)制到H1002單元格中,統(tǒng)計出“造價”總和。
小提示:修改函數(shù)“SUBTOTAL”中的第一個參數(shù)(“9”),可以實現(xiàn)求平均(AVERAGE—1)、計數(shù)(COUNT—2)等統(tǒng)計目的(具體請看該函數(shù)的幫助)。
二、編輯宏
切換到Sheet2工作表中,在A1至A10單元格中輸入工程“類型”名稱(此處的“1”和“10”與下述代碼中的循環(huán)起、止數(shù)值相同,如圖1)。按下“Alt+F11”組合鍵,進(jìn)入“Visual Basic編輯”狀態(tài),執(zhí)行“插入模塊”命令,插入一個新模塊(“模塊1”)。將下述代碼輸入到“模塊1”右側(cè)的編輯區(qū)域中:
小提示:在上述代碼中,每一行英文單引號“'”及其后面的字符,是對代碼的解釋,在實際輸入時可不輸入。
輸入完成后,關(guān)閉“Visual Basic編輯”窗口,返回工作表中。
三、制作按鈕
執(zhí)行“視圖工具欄控件工具箱”命令,展開“控件工具箱”(圖2),單擊“工具箱”中的“命令按鈕”按鈕,然后在表格中拖拉出一個按鈕來。右擊剛才添加的按鈕,在隨后彈出的快捷菜單中,選擇“屬性”選項,展開“屬性”對話框。切換到“按分類序”標(biāo)簽下,展開“外觀”選項,將“Caption”選項后面的字符修改為“分類打印”。再展開“雜項”選項,將“PrintObject”選項設(shè)置為“False”,設(shè)置完成后,關(guān)閉“屬性”對話框。
小提示:將“PrintObject”選項設(shè)置為“False”的目的是:在打印時,該按鈕不被打印出來;否則(設(shè)置成True)按鈕會打印到紙張上,影響表格效果。
雙擊剛才添加的命令按鈕,再次進(jìn)入“Visual Basic編輯”狀態(tài),將
Private Sub CommandButton1_Click()
分類匯總打印 '此處字符必須與上述宏名稱一致
End Sub
輸入完成后,關(guān)閉“Visual Basic編輯”窗口,返回工作表中。像調(diào)整圖形大小一樣,調(diào)整好命令按鈕的大小,然后將其定位在表格的合適位置上,再按下“工具箱”上的“退出設(shè)計模式”按鈕。
當(dāng)需要分類打印時,只要單擊表格中的“分類打印”按鈕即可快速獲得。
【數(shù)據(jù)分類,一鍵輕松搞定】相關(guān)文章:
職場上如何輕松搞定九類麻煩同事03-02
輕松搞定!——外企上班族常用英語對話十句11-10
輕松面試米其林11-20
如何讓工作輕松11-19
輕松面試技巧01-10
求職前怎樣搞定完美裝備11-12
女孩做IT 客戶廠家都搞定?11-11
另類充電搞定你的隱形上司11-09
求職前,怎樣搞定完美裝備11-12