KutoolsforOffice — 一套方案,五大工具。事半功倍。

如何在 Excel 中将数据复制并粘贴到多个工作表?

作者Kelly修改日期

在 Excel 中,复制和粘贴数据是一项用户频繁使用的基础操作。对于简单任务,在单个工作表内,甚至在两个工作表之间复制数据都十分快捷高效。然而,当需要在多个工作表中反复复制或合并相同数据时,手动操作往往会变得繁琐又耗时。面对这类重复性任务,许多用户都在寻找更高效的方法,以实现批量复制、链接或合并多个工作表中的数据。本教程将为您介绍多种实用解决方案,助您轻松应对这些挑战——无论是将相同内容快速复制到多个工作表、从多个工作表中提取同一单元格的数据,还是将所有数据汇总至单一工作表。这些方法既涵盖 Excel 内置功能,也包括高级技巧与加载项,助您实现极致效率。

将数据复制粘贴到多个工作表的相同区域

从多个工作表中复制相同单元格并粘贴到一个工作表中

将多个工作表中的所有数据复制到单个工作表中


使用填充功能将数据复制粘贴到多个工作表的相同区域

Excel 提供了高效的“填充”>“跨工作表填充”功能,可将选定的数据块一键复制并同步粘贴到多个工作表的相同位置。当您需要将模板、标题或常量值等相同信息快速分发至多个工作表的对应区域时,此功能尤为高效,省去逐个工作表手动复制粘贴的繁琐操作。使用步骤如下:

1. 在当前工作表中,选择您要复制并粘贴到其他工作表的区域,请确保该区域格式正确且包含所需复制的数据。

2. 转至工作簿底部的“工作表”标签栏。如需选择多个工作表:

  • 按住 Ctrl 键,逐一单击所需的工作表,即可轻松选中多个不相邻的工作表。
  • 按住 Shift 键,先单击第一个工作表,再单击最后一个要选择的工作表,即可轻松选中两者之间的所有工作表。
这将确保所有目标工作表均被高亮显示。请参见截图:
显示如何在 Excel 中使用 Ctrl 或 Shift 键选择多个工作表的截图

3. 选中所有目标工作表后,切换到功能区中的“开始”选项卡,点击“填充”>“跨工作表填充”。此命令专为帮助用户在多个工作表上高效执行批量操作而设计。参见截图:
Excel 主选项卡中“填充 > 跨工作表填充”选项的截图

4. 在“跨工作表填充”对话框中,选择您要粘贴的内容类型:

  • 全部:同时复制数据、公式和格式(如需完整复制,推荐使用此选项)。
  • 内容:仅复制单元格的值和公式,不带格式。
  • 格式:仅复制格式,不复制实际内容。
选择适合您任务的选项后,单击“确定”以完成确认。参见截图:
Excel 中“跨工作表填充”对话框的截图,已选择“全部”选项

原始选定区域的数据现已同步复制到所有选定工作表的相同位置,非常适合用于更新部门报表或月度报告中的模板与标准布局。

提示与注意事项此方法适用于同步相同布局或重复录入的场景。但若需将变动或可变的数据复制到多个工作表,或将多个来源的数据合并到一个工作表中,则可能不太理想。此外,请确保所有工作表结构一致,否则可能出现意外结果。如果收到“无法完成此操作”的警告,请确认所有工作表均未受保护,并留有足够空间粘贴数据。


使用 VBA 代码跨多个工作表复制粘贴数据

对于熟悉自动化操作或经常需要执行重复性复制粘贴任务(而标准 Excel 工具难以轻松应对)的用户来说,VBA 宏能带来更高的灵活性。借助 VBA,您可以精准定义数据的复制与粘贴方式及目标位置,无论是从不同区域复制数据、处理动态变化的工作表名称,还是在操作过程中应用自定义规则,都能轻松胜任各种简单乃至复杂的场景。

1. 单击开发工具 > Visual Basic。在弹出的 Microsoft Visual Basic for Applications 窗口中,选择插入 > 模块,并将以下 VBA 代码粘贴到模块窗口中:

Sub CopyRangeToMultipleSheets()
    Dim ws As Worksheet
    Dim SrcRange As Range
    Dim DestRange As Range
    Dim SheetName As String
    Dim ListOfSheets As Variant
    Dim i As Integer
    
    On Error Resume Next
    xTitleId = "KutoolsforExcel"
    
    Set SrcRange = Application.Selection
    Set SrcRange = Application.InputBox("Select the range to copy:", xTitleId, SrcRange.Address, Type:=8)
    
    ListOfSheets = Application.InputBox("Enter target sheet names separated by commas (e.g. Sheet2,Sheet3):", xTitleId, "", Type:=2)
    
    Application.ScreenUpdating = False
    
    For i = 0 To UBound(Split(ListOfSheets, ","))
        SheetName = Trim(Split(ListOfSheets, ",")(i))
        
        If SheetName <> "" Then
            Set ws = Worksheets(SheetName)
            Set DestRange = ws.Range(SrcRange.Address)
            
            SrcRange.Copy
            DestRange.PasteSpecial xlPasteAll
        End If
    Next i
    
    Application.CutCopyMode = False
    Application.ScreenUpdating = True
    
    MsgBox "Copying completed.", vbInformation
End Sub

2. 单击运行按钮运行按钮(或按 F5)执行宏。系统将提示您选择要复制的区域,然后输入目标工作表名称(多个工作表请用逗号分隔)。宏会将所选数据复制到每个指定工作表的相同区域中。

提示运行宏前,请确保目标工作表已存在且包含匹配区域,以免发生空白粘贴或覆盖错误。宏执行后,请立即检查数据,确认复制结果符合预期。VBA 操作无法通过标准“撤销”命令撤回,务必提前保存工作!

优势宏在执行遵循自定义逻辑的批量操作时极为灵活,还能轻松重复复杂任务,特别适合高级用户或有特殊复制需求的用户。


使用 Kutools for Excel 从多个工作表中复制相同单元格

此方法介绍了 Kutools for Excel 的“自动递增工作表引用”工具,可助您轻松从多个不同工作表中提取相同的单元格(或区域),并将结果集中呈现在新的汇总工作表中。无论是编制标准化报告,还是收集统一指标(如各团队或门店的月度销售额),该功能都能显著提升效率,免去繁琐的手动重复操作。

Kutools for Excel 提供 300 多项高级功能,简化复杂任务,提升创造力与效率。集成 AI 能力,Kutools 精准自动化任务,让数据管理变得轻松自如。Kutools for Excel 的详细信息……         免费试用……

1. 首先,单击“工作表”标签栏中的“新建”按钮,创建一个新工作表作为您的汇总或目标工作表,以便集中存放收集的数据并保持井然有序。

2. 接下来,在新的汇总工作表中选择用于显示导入值的单元格(例如 D7),然后切换到功能区上的“Kutools”选项卡,在“公式”组中单击“更多”,并选择“动态引用工作表”。参见截图:
Kutools 菜单中“动态引用工作表”选项的截图

3. 在“填充工作表引用”对话框中:

  • 从“填充顺序”下拉菜单中选择合适的选项,该选项将决定引用按行还是按列填充。
  • 在“工作表列表”中勾选您需要提取数据的工作表。
  • 单击“填充区域”按钮,即可用所选工作表中的引用自动填充选定区域,随后单击“关闭”完成操作。
参见截图:
“填充工作表引用”对话框的截图

所选工作表中对应单元格(或区域)的内容将动态呈现在您的汇总工作表中,所有数据均保持链接状态,并在源单元格更新时自动同步。参见截图:
显示从多个工作表复制数据到单个工作表的截图

优势如果您经常需要从多个工作表中提取同类信息,此方法可大幅节省时间。此外,源单元格中的任何更新都会自动同步至汇总表,确保数据实时准确!

提示请确保所有被引用的工作表均存在于工作簿中;若在建立链接后删除源工作表,可能导致引用错误。对于较大或动态性较强的工作簿,建议保持各工作表中单元格位置一致,以确保汇总结果准确可靠。


使用 Excel 公式跨多个工作表引用数据

Excel 公式可让您动态引用其他工作表中的数据,无需反复复制粘贴,即可轻松从多个工作表的相同单元格或区域中提取信息。这一功能在创建汇总表、仪表板,或需要实时展示来自多个工作表的最新聚合数据时尤为实用。其中,两大关键技术之一便是使用 INDIRECT 函数。

使用 INDIRECT 实现动态引用:
当工作表名称不相邻,或需基于工作簿中的工作表名称列表动态构建引用时,INDIRECT 函数尤为实用。它还能轻松从非连续工作表的指定单元格中提取数据。

1. 假设 A2:A4 中列出了目标工作表名称(例如 Sheet 1、Sheet 2、Sheet 3),您希望从每个工作表中提取 B5 单元格的值,并依次显示在 B2、B3 等单元格中。请在 B2 中输入:

=INDIRECT("'"&A2&"'!B5")

将此公式沿列表向下填充,每个单元格将显示对应工作表中 B5 单元格的值。

实用提示INDIRECT 函数在处理动态或非相邻工作表时更加灵活,但若重命名工作表,其引用不会自动更新。

优势基于公式的方案可确保汇总表或仪表板中的数据始终实时反映源工作表的更新,避免重复的复制粘贴操作。尽管在引用大量工作表时初始设置可能稍显复杂,但一劳永逸,效率倍增!


将多个工作表中的所有数据复制到单个工作表中

当您需要将分散在多个工作表中的所有记录合并到一个工作表中,以便进行分析或生成报告时,Kutools for Excel 提供了便捷的“汇总工作表”功能。该功能特别适用于整合历史数据、合并不同部门的工作表,或为后续数据处理创建统一的主列表。

Kutools for Excel——包含 300 多个 Excel 必备工具,并永久免费畅享 AI 功能!立即下载!

1. 单击“KUTOOLS PLUS”>“汇总”,即可打开汇总工作表对话框。这一强大工具能轻松简化大型工作簿中的复杂批量操作。
Excel 中 Kutools Plus 菜单内的“合并”选项的截图

2. 在向导的第 1 步(共 3 步)中,选择“将工作簿中的多个工作表合并为一个工作表”,然后单击“下一步”。参见截图:
Kutools for Excel 中“合并工作表 向导第1步(共3步)”的截图

3. 在第 2 步(共 3 步)中:

  • 在“工作簿列表”部分,请确保仅勾选当前工作簿。
  • 在“工作表列表”中,勾选所有需要合并的工作表。
  • “相同区域”按钮可快速为每个工作表指定相同的区域,轻松简化结构一致的工作簿设置流程。
显示如何在“合并工作表 向导第2步(共3步)”中选择工作表的截图

 

4. 第 3 步(共 3 步)可让您调整其他设置,例如处理标题、管理空白行和格式选项——请根据需要进行配置,然后单击“完成”。
“合并工作表 向导第3步(共3步)”的截图

5. 系统将弹出提示,询问您是否要保存当前的合并方案。选择“是”即可保存以供将来使用,或选择“否”(若您无需重复使用该设置)。
“合并工作表”对话框提示保存合并方案的截图

该功能将所选工作表中的所有数据复制并汇总至一个新工作表,从而在统一位置简化后续的数据分析与报告工作。

注意虽然 Kutools 让此类批量合并操作变得轻松简单,但仍需留意各工作表间的数据结构差异——若存在显著不一致,可能会影响合并结果。为获得最佳效果,建议主要在结构相似的工作表上使用“合并”功能。


相关文章:

最佳办公效率工具

🤖KUTOOLS AI 助手:基于以下内容革新数据分析:智能执行   |  生成代码|  创建自定义公式  |  数据分析及生成图表|  调用 Kutools Functions……
热门功能查找、高亮或标记重复项   |  删除空白行   |  合并列或单元格且不丢失数据   |  不使用公式的四舍五入……
高级 LOOKUP多条件 VLookup  |  多值 VLookup  |   跨多工作表 VLookup   |   模糊查找……
高级下拉列表快速创建下拉列表   |  级联下拉列表   |  多选下拉列表……
列管理器添加指定数量的列|移动列|切换隐藏列的可见性状态|比较区域与列……
特色功能网格聚焦   |  设计视图   |增强编辑栏   | 工作簿和表管理器   |  资源库(自动文本)|  日期提取   |  汇总工作表  |  加密/解密单元格   | 按列表发送邮件   |  超级筛选   |   特殊筛选(筛选粗体单元格/斜体/删除线……) ......
精选 15 工具集12 文本工具添加文本删除特定字符,……)|   50+ 图表 类型甘特图,……)|   40+ 实用公式基于生日计算年龄,……)|   19 插入工具插入二维码从路径插入图片,……)|   12 转换工具小写金额转大写汇率转换,……)|   7 合并和拆分工具高级合并行分割单元格,……)|……更多
在您的首选语言中使用 Kutools – 支持英语、西班牙语、德语、法语、中文及 40+ 种其他语言!

使用 Kutools for Excel 大幅提升您的 Excel 技能,体验前所未有的高效。Kutools for Excel 提供 300 多项高级功能,助您提升生产力、节省时间。立即点击此处,获取您最需要的功能……


Office Tab 为 Office 带来标签式界面,让您的工作更轻松

  • 在 Word、Excel、PowerPoint、Publisher、Access、Visio 和 Project 中启用标签式编辑和阅读
  • 在同一个窗口的新标签页中打开并创建多个文档,而非在新窗口中。
  • 将您的工作效率提升 50%,每天减少数百次鼠标点击!

所有 Kutools 插件,一个安装程序

Kutools for Office 套件捆绑了适用于 Excel、Word、Outlook 和 PowerPoint 的插件以及 Office Tab Pro,非常适合需要跨多个 Office 应用高效协作的团队。

ExcelWordOutlookTabsPowerPoint
  • 一体化套件— Excel、Word、Outlook 和 PowerPoint 插件 + Office Tab Pro
  • 一个安装程序,一个许可证— 几分钟内完成设置(支持 MSI)
  • 协同效果更佳— 在多个 Office 应用中实现高效协同
  • 30 天全功能试用— 无需注册,无需信用卡
  • 超值之选— 比单独购买插件更省钱