推廣 熱搜: 疫情  定額  增值稅  住建廳  建造師  河南省  江西省  閩建〔2018〕  全過程工程咨詢  圖集 

怎樣將excel中的幾個明細表中的每一條記錄依次匯總到一個總表中

   日期:2019-03-31    
核心提示:分表中數據會隨機變化,總表自動隨之改變不用手工填充。據說需要使用VBA代碼,本人非計算機專業(yè),看不懂程序代碼,還請大神相助

分表中數據會隨機變化,總表自動隨之改變不用手工填充。據說需要使用VBA代碼,本人非計算機專業(yè),看不懂程序代碼,還請大神相助。

可以利用VBA將excel中的幾個明細表中的每一條記錄依次匯總到一個總表中

軟件版本:Office2007

方法如下:

1.當前工作簿中有多個工作表,結構都一樣如下所示,當里面的數據不一樣,將它們全部合并到當前工作表中:

2.Alt+F11,打開宏界面,輸入如下代碼:

Sub m()

For Each sh In Sheets '遍歷每個工作表,提取數據

If sh.Name <> "Sheet1" Then '排除當前工作表

sh.Range("B2:G" & sh.Range("A65536").End(3).Row).Copy Range("A" & Range("A65536").End(3).Row + 1) '將工作表中的所有數據復制到當前工作表最后一行的下一行中

End If

Next

End Sub

3.F5執(zhí)行代碼,返回Excel得到結果如下,工作表合并完成:



 

附件請到造價文庫中查找下載

打賞

 
更多>同類造價資訊

推薦圖文
推薦信息
推薦造價資訊
點擊排行
?
網站首頁  |  關于我們  |  代理招商  |  聯(lián)系方式  |  網站地圖  |  排名推廣  |  廣告服務  |  積分換禮  |  網站留言  |  RSS訂閱造價者  |  違規(guī)舉報