摘要： 下面小编为大家详细介绍利用VBA将excel多个工作表数据快速合并到一个工作表方法，教程很不错，也不是很难，推荐过来，大家一起来学习吧 利用VBA将数据区域不...
利用VBA将数据区域不定的多个工作表数据快速合并到一个工作表方法。有需要的朋友可以跟着教程一起来学习！
方法/步骤
分别有工作表1、2、3数据区域如下图所示：
按ALT F11打开VBE编辑器，在工程窗口下的Microsoft Excel对象右键-插入-模块，新建一个模块1。
输入如下代码：
Sub hbgzb()
Dim sh As Worksheet, flag As Boolean, i As Integer, hrow As Integer, hrowc As Integer</p> flag = False
For i = 1 To Sheets.Count
If Sheets(i).Name = "合并数据" Then flag = True
Next
If flag = False Then
Set sh = Worksheets.Add
sh.Name = "合并数据"
Sheets("合并数据").Move after:=Sheets(Sheets.Count)
End If
For i = 1 To Sheets.Count
If Sheets(i).Name <> "合并数据" Then
hrow = Sheets("合并数据").UsedRange.Row
hrowc = Sheets("合并数据").UsedRange.Rows.Count
If hrowc = 1 Then
Sheets(i).UsedRange.Copy Sheets("合并数据").Cells(hrow, 1).End(xlUp)
Else
Sheets(i).UsedRange.Copy Sheets("合并数据").Cells(hrow hrowc - 1, 1).Offset(1, 0)
End If
End If
Next i
End Sub
按ALT F8打开宏对话框窗口，鼠标单击执行hbgzb宏。
Excel制作分类标签间隔式条形图
这篇教程是向脚本之家的朋友介绍Excel制作分类标签间隔式条形图方法，教程制作出来的条形图还是很不错的，很值得学习，推荐到脚本之家，喜欢的朋友可以跟着教程一起来学习
实现如图所示效果：
注意事项
本段VBA代码由于将编辑过的区域作为源数据区域，顾无论该数据源有无数据，只要曾经编辑过皆做为源数据源，做拷贝处理。
以上就是利用VBA将excel多个工作表数据快速合并到一个工作表方法介绍，希望能对大家有所帮助！
上一篇：玩转职场excel Excel快捷功能使用方法 下一篇：Excel制作分类标签间隔式条形图
相关文章
- Excel教程 Excel表格下拉列表怎么设置
Excel表格下拉列表怎么设置呢？很多用户对此还不是很清楚，小编这里就给大家带来有关Excel表格下拉列表怎么设置的回答，希望能够对大家有所帮助。......
2023-01-18
详细阅读 - Excel教程 Excel如何打印选定区域
Excel如何打印选定区域呢？很多用户对此还不是很清楚，小编这里就给大家带来有关Excel如何打印选定区域的回答，希望能够对大家有所帮助。......
2023-01-18
详细阅读 - Excel教程 Excel怎么设置英文首字母大写
Excel怎么设置英文首字母大写？Excel中输入英文首字母大写怎么操作？当我们需要将Excel表格中的英文单词，把首字母全部大写，该怎么操作呢，怎么将Excel中英文首字母大写，Excel怎么设置英文首字母大写，下面就和小编一起来看看吧！......
2023-01-18
详细阅读 - Excel教程 Excel怎么给所有的数字加10
Excel怎么给所有的数字加10？Excel数字怎么全部加10？怎么全部加1？当我们在使用Excel时，所有的数字都少10，或者1，该怎么给所有的数字都 10、 1呢，Excel怎么给所有的数字加10，EXcel数字怎么全部加10，下面就和小编一起来看看吧！......
2023-01-18
详细阅读 - Excel教程 Excel怎么设置日期自动更新
Excel怎么设置日期自动更新？Excel怎么设置日期自动更新？当我们Excel表格中的日期需要实时更新到最新日期，该怎么设置呢，怎么将Excel表格日期自动更新到最新日期，Excel怎么设置日期自动更新，下面就和小编一起来看看吧！......
2023-01-18
详细阅读
excel如何统计数据的个数
在一个多工作表的文件中查找数据的时候，如果你是一个个工作表翻着找，就看看这个吧。下面小编就为大家介绍excel如何统计数据的个数方法，希望能对大家有所帮助
