Excel 如何实现数据自动提取到汇总表格呢

发布网友 发布时间：2022-04-20 14:40

我来回答

共3个回答

热心网友 时间：2022-07-14 18:01

1、在excel功能区找到方方格子，并找到汇总功能；

2、选择“多簿汇总到一表”，然后点击开始

3、选择需要提取的工作表，如果全部提取就选择第一项，如果数据在指定工作表，就选择对应的名称，然后进行下一步；

4、在弹出的对话框中选择需要提取数据的范围以及数值或者格式；可以设置从第几行开始到多少行结束；

5、设置文件需要存放的地址(默认为桌面)，点击开始，就会开始提取数据；完成之后就会在设置的地址出现一个“提取结果”的文件，所有的数据就提取出来了。

热心网友 时间：2022-07-14 18:01

excel中实现数据自动汇总到汇总表的常用办法是vba汇总，高效快速。

操作方法如下：

打开excel，按住alt+F11打开VBA编辑器：

新建一个模块，贴入以下代码：

Sub 汇总()

Dim d As Object

Dim Arr As Variant

Arr =Worksheets("数据源").Range("A2:B" & Worksheets("数据源").Range("B"& Rows.Count).End(xlUp).Row)

Dim i As Long

Set d =CreateObject("Scripting.dictionary")

For i = 1 ToUBound(Arr)

d(Arr(i, 1)) =d(Arr(i, 1)) + Arr(i, 2)

Next i

Range("A1:B1") = Array("产品编码", "数量")

Range("A2").Resize(d.Count) =Application.WorksheetFunction.Transpose(d.keys)

Range("B2").Resize(d.Count) =Application.WorksheetFunction.Transpose(d.items)

With Range("a1").CurrentRegion

.Borders.LineStyle = xlContinuous

.HorizontalAlignment = xlCenter

.VerticalAlignment = xlCenter

End With

End Sub

3.指定执行的宏：

4.效果如下：

热心网友 时间：2022-07-14 18:02

1.
在excel功能区找到方方格子,并找到汇总功能;
2.
选择“多簿汇总到一表”,然后点击开始
3.
选择需要提取的工作表,如果全部提取就选择第一项,如果数据在指定工作表,就选择对应的名称,然后进行下一步;
4.
在弹出的对话框中选择需要提取数据的范围以及数值或者格式;可以设置从第几行开始到多少行结束...
5.
设置文件需要存放的地址(默认为桌面),点击开始,就会开始提取数据;完成之后就会在设置的...