如何在EXCEL中实现将一个EXCEL文件中每份表格汇总到一张表,每张表表头相同,内容不尽相同.谢谢了!

Question

以下是每个sheet的表头
序号 日期 供应商代码 第三方物流 窗口时间 图号 中文描述 到货异常信息 备注
时间 订货量差 包装 标识 单据 其它
时间 订货量差 包装 标识 单据 其它 这些字段是属于到货异常信息下的子字段

Answer 1

用VB非常简单
Sub 台帐检查统计()
Dim a(), z(), b(1 To 100), c(1 To 100) As String
Dim i, ii As Integer
For ii = 1 To Sheets.Count - 1
Sheets(ii).Select
For i = 1 To 100
ReDim a(1 To i), z(1 To ii)
a(i) = Sheets(ii).Cells(i + 4, 8).Text
b(i) = Sheets(ii).Cells(i + 4, 9).Text
c(i) = Sheets(ii).Cells(i + 4, 10).Text
z(ii) = Sheets(ii).Name
Sheets(Sheets.Count).Cells(i + (ii - 1) * 100, 1) = a(i)
Sheets(Sheets.Count).Cells(i + (ii - 1) * 100, 3) = b(i)
Sheets(Sheets.Count).Cells(i + (ii - 1) * 100, 2) = c(i)
Sheets(Sheets.Count).Cells(i + (ii - 1) * 100, 4) = z(ii)
Next
Next
End Sub

Answer 2

不是很明白你需要的是什么。建议数据透视表试下，选择需要的字段生成透视表