合并表步驟1:一個工作簿里面有多個工作表,各工作表之間的字段是一致的,但數據不一致。由于工作需要,需要將各個工作表的數據匯總到一個表格里面做匯總分析,數據少、工作表數目不多的時候,CTRL+C后CTRL+V逐個復制粘貼是可以的,但數據量大、工作表數據多的時候,則可以用宏進行快速處理;
合并表步驟3:方法:使用宏快速匯總: (1)錄制宏:首先,點擊文件菜單的“工具”菜單,選擇“宏”—“宏” 合并表步驟4:出現以下的宏界面,在“宏名”中按照自己喜好錄入一個名稱,這里錄入“合并工作表”的名稱,“位置”是指該宏可以在那個EXCEL工作簿中使用,這里選擇“當前工作簿”。然后點擊“創建”。
Dim m As Integer Dim n As Integer Dim o As Integer For m = 2 To 6 n = Sheets(m).[a65536].End(xlUp).Row o = Sheets(1).[a65536].End(xlUp).Row Sheets(m).Select Range("a1", "z" & n).Select Range("a" & n).Activate Selection.Copy Sheets(1).Select Range("a" & o + 1).Select ActiveSheet.Paste Next 合并表步驟6:特別注意這一段字符“For m = 2 To 6”,由于要匯總的數據的工作表有5個,加上“合并報表”這個工作表本身,一共是6個工作表,因此“For m = 2 To 6”中選擇輸入6,如果后面要匯總的數據工作表有3個,則是錄入4,如果有12個,則是錄入13,依次類推。
(2)使用已錄制好的宏“合并工作表”,進行工作表的數據匯總。首先,在“合并報表”中,點擊點擊文件菜單的“工具”菜單,選擇“宏”—“宏” 合并表步驟8:出現宏界面,點擊選擇“合并工作表”,然后點擊“執行”。就能達到匯總的效果。要注意,為避免出錯,最好檢查以下匯總后的報表中有數據的行數,是否等于后面各個報表有數據的行數總和。 合并表步驟9:另外要注意,已經使用宏的報表,在保存時,會出現以下提示,點擊確定即可。 |
免責聲明:本站部分文章和圖片均來自用戶投稿和網絡收集,旨在傳播知識,文章和圖片版權歸原作者及原出處所有,僅供學習與參考,請勿用于商業用途,如果損害了您的權利,請聯系我們及時修正或刪除。謝謝!
始終以前瞻性的眼光聚焦站長、創業、互聯網等領域,為您提供最新最全的互聯網資訊,幫助站長轉型升級,為互聯網創業者提供更加優質的創業信息和品牌營銷服務,與站長一起進步!讓互聯網創業者不再孤獨!
掃一掃,關注站長網微信