导读 关于如何合并多个sheet页,如何合并多个sheet表这个问题很多朋友还不知道,今天小六来为大家解答以上的问题,现在让我们一起来看看吧!1、1
关于如何合并多个sheet页,如何合并多个sheet表这个问题很多朋友还不知道,今天小六来为大家解答以上的问题,现在让我们一起来看看吧!
1、1. 增加一个工作表sheet,重命名xx 。
2、2. 点到新增加的工作表中,按ALT+F11,出现如图的对话框。
3、3.双击名称xx的图标。
4、出现如下对话框。
5、4. 在上图红色的区域复制上如下代码。
6、Sub GetStName() Dim FinalRow As Long Dim St As Worksheet FinalRow = ActiveSheet.Cells(Rows.Count, 1).End(xlUp).Row + 2 For Each St In ThisWorkbook.Worksheets Cells(FinalRow, 1).Value = ***.Name FinalRow = FinalRow + 1 Next StEnd Sub5.把名称为xx的图表的属性改为sheet1(这需要把原先那个sheet1,改为其他的sheet,不和其他工作表重复即可6.点击菜单中的执行的三角符号,就可以合并所有sheet的工作表内容到一个工作表中。
本文分享完毕,希望对大家有所帮助。
标签:
免责声明:本文由用户上传,如有侵权请联系删除!