之间网

从另一个excel表中自动提取数据(excel自动从另外表格提取数据)

百科精选
导读 今天之间网超哥来为大家解答以上的问题。从另一个excel表中自动提取数据,excel自动从另外表格提取数据相信很多小伙伴还不知道,现在让我们...

今天之间网超哥来为大家解答以上的问题。从另一个excel表中自动提取数据,excel自动从另外表格提取数据相信很多小伙伴还不知道,现在让我们一起来看看吧!

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

2、操作方法如下:打开excel,按住alt+F11打开VBA编辑器:新建一个模块,贴入以下代码:Sub 汇总()Dim d As ObjectDim Arr As VariantArr =Worksheets("数据源").Range("A2:B" & Worksheets("数据源").Range("B"& Rows.Count).End(xlUp).Row)Dim i As LongSet d =CreateObject("Scripting.dictionary")For i = 1 ToUBound(Arr)d(Arr(i, 1)) =d(Arr(i, 1)) + Arr(i, 2)Next iRange("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 = xlCenterEnd WithEnd Sub3.指定执行的宏:4.效果如下:。

本文就为大家分享到这里,希望小伙伴们会喜欢。

标签: