要将输入的数据自动复制到一个汇总工作表，你可以使用Excel的几种不同方法，包括VBA宏、公式或Excel的高级特性如Power Query。下面介绍两种常见的实现方式： 方法 1: 使用VBA宏自动复制数据你可以使用VBA编写一个宏，当在特定工作表中输入数据时，自动将数据复制到汇总工作表。以下是一个简单的示例，展示了如何在数据输入后自动将其复制到汇总工作表。 Private Sub Worksheet_Change(ByVal Target As Range) Dim wsSummary As Worksheet Set wsSummary = Sheets("汇总") ' 假设汇总工作表的名字叫做"汇总" Dim LastRow As Long LastRow = wsSummary.Cells(wsSummary.Rows.Count, "A").End(xlUp).Row + 1 ' 在汇总表中找到最后一行 ' 检查更改是否发生在特定范围内，这里假设是A列 If Not Intersect(Target, Me.Range("A:A")) Is Nothing Then Target.EntireRow.Copy Destination:=wsSummary.Range("A" & LastRow) ' 复制整行到汇总表的下一空行 End IfEnd Sub将上述代码放置在你要从中复制数据的工作表的VBA代码页下。每当你在该工作表的A列输入数据时，整行数据就会被自动复制到汇总工作表的下一个空白行。 方法 2: 使用Power Query合并数据如果你不想使用VBA，Power Query是另一个强大的工具，可以用来自动从多个工作表汇总数据。 将各个工作表的数据转换为表格：选中数据范围，然后点击插入 -> 表格。使用Power Query合并表格：转到数据 -> 获取与转换数据 -> 获取数据 -> 来自工作表，然后选择你的表格。在Power Query编辑器中，使用“合并查询”功能将各个表格合并为一个查询。加载查询结果到一个新的工作表，作为汇总数据。这两种方法各有优势，VBA提供了更大的灵活性和自动化程度，而Power Query提供了一个不需要编写代码的解决方案，特别适合处理大量数据和复杂的数据结构。选择哪种方法取决于你的具体需求以及对工具的熟悉程度。