将所有数据返回到新工作表的 Excel VBA 函数

【问题标题】：Excel VBA function that returns all data to a new sheet将所有数据返回到新工作表的 Excel VBA 函数
【发布时间】：2011-06-14 20:14:53
【问题描述】：

如何创建一个应用预定义过滤器等的函数，然后使用该数据生成一个新工作表？

我只需要创建新工作表部分。谢谢。

【问题讨论】：

标签： excel spreadsheet excel-2010 vba

【解决方案1】：

使用预定义的模板表并制作副本：

Dim wb as Workbook
Set wb = '... (set the workbook here where you want your new sheet to be copied)
ThisWorkbook.Sheets("NameOfYourTemplate").Copy _
  after:=wb.Sheets(wb.Sheets.Count)

【讨论】：