导读 您好,今天蔡哥来为大家解答以上的问题。怎么合并多个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的工作表内容到一个工作表中。
本文就为大家分享到这里,希望小伙伴们会喜欢。