这要看你想怎么索引:
1.把12个分表的数据合并到当前表,如果求和,可以用数据中的合并计算,要求表格完全一样,位置也一样,也可以直接输入公式:=SUM(SHEET1!A1:SHEET12!A1),就能把12个分表的A1单元格数据求和了,其它需要求和的,只需要修改上面公式中的A1为相应单元格就行了。
2.如果是把12个分表合并成一个表,不是相加,是把需要的12个表的表,在后面空白行自动复制过来。就用VBA简单:
EXCEL:一个工作薄中多个工作表合并代码
在EXCEL中,到合并表里打开宏,将下列代码进行粘贴并保存。然后返回你需要合并的工作表中。或按 alt + f11,双击工程资源管理器里面的合并表的SHEET,在右侧的代码区粘贴如下代码。运行此宏,就合并了。
Sub 合并sheets()
n = 12 '源表个数,根据需要修改!
nstart = 9 '每个单表数据的起始行数,根据需要修改!
k = nstart '目标表的行标
For i = 1 To n
irow = nstart '行标
While Sheets(i).Cells(irow + 1, 1) <> "" '后面个1以第1列数据为结束标示,确定源表的行数,根据需要修改!
irow = irow + 1
Wend
Sheets(i).Rows(nstart & ":" & irow).Copy '复制源数据行
Sheets(n + 1).Activate
Sheets(n + 1).Cells(k, 1).Select
ActiveSheet.Paste '粘贴数据
k = k + irow - nstart + 1
Next i
End Sub
温馨提示:答案为网友推荐,仅供参考