Table of contents
应对数据 如果你有很多行，并想根据一些标准将它们复制到另一个工作表上，这可能是相当令人厌烦和耗时的。 但有了微软的 Visual Basic应用(VBA) 你可以创建宏，用它可以根据不同的标准轻松地将数据从一个工作表复制到另一个工作表。 在这篇文章中，我将向你展示 如何复制行 通过使用Excel VBA，根据2个不同类型的标准，向另一个工作表提供数据。 .
比方说，你在一个名为""的工作表中有以下数据集。 数据 "现在，你想根据一些标准在另一张表中复制特定的行。
下载实践工作手册
根据标准将行复制到另一个工作表.xlsm通过Excel VBA根据标准将行复制到另一个工作表的2种方法
1.根据文本标准将行复制到另一个工作表中
在这个演示中，我将向你展示如何根据文本标准将行从一个工作表复制到另一个工作表。 假设，你想复制销售人员的数据，这些销售人员在 弗吉尼亚州 的工作表中的一个名为 地区销售 使用Excel VBA 要做到这一点，首先。
➤ 按 ALT+F11 以打开 VBA 窗口。
在 VBA 窗口。
➤ 点击 插入 选项卡，并选择 模块 .
它将打开 模块(代码) 窗口，现在。
➤ 将以下代码插入到 模块(代码) 窗口。
Sub Copy_Criteria_Text() Application.ScreenUpdating = False With ActiveSheet .AutoFilterMode = False With Range("C1", Range("C" & Rows.Count).End(xlUp)) .AutoFilter 1, "Virginia" On Error Resume Next .Offset(1).EntireRow.Copy Sheet3.Range("A" & Rows.Count) .End(xlUp) .Offset(1) End With .AutoFilterMode = False END With Application.ScreenUpdating = TrueSheet3.Select End Sub 该代码将创建一个名为 复制_标准_文本 这将在列中搜索弗吉尼亚 C 的工作表，并返回包含Virginia的工作表的行，这些行的名称为 地区销售 (第三张)。
在这之后。
➤ 关闭或最小化 VBA 窗口。
➤ 按 ALT+F8
它将打开 宏观 窗口。
➤ 选择 复制_标准_文本 在 巨集名称 框中，并点击 运行 .
因此，带有Virginia的行将被复制到名为 "Virginia "的工作表中。 地区销售
阅读更多：如何在Excel中自动复制行到另一个工作表（4种方法）。
2.根据数字标准将行复制到另一个工作表中
现在，我将向你展示如何根据数字标准从一个工作表复制行到另一个工作表。 假设，你想把大于100000美元的销售数据复制到一个名为 "A "的工作表中。 顶级销售 要做到这一点，首先。
➤ 按 ALT+F11 以打开 VBA 窗口。
在 VBA 窗口。
➤ 点击 插入 选项卡，并选择 模块 .
它将打开 模块(代码) 窗口，现在。
➤ 将以下代码插入到 模块(代码) 窗口。
Sub Copy_Criteria_Number() Application.ScreenUpdating = False With ActiveSheet .AutoFilterMode = False With Range("D1", Range("D" & Rows.Count).End(xlUp)) .AutoFilter 1, ">100000" On Error Resume Next .Offset(1).EntireRow.Copy Sheet4.Range("A" & Rows.Count).End(xlUp) .Offset(1) End With .AutoFilterMode = False END With Application.ScreenUpdating =True Sheet4.Select End Sub 该代码将创建一个名为 复制_标准号 这将在列中搜索大于100000的值 D 的工作表，名为 数据 并返回工作表中包含销售价值超过100000美元的行，这些行的名称为 顶级销售 (第四张)。
在这之后。
➤ 关闭或最小化 VBA 窗口。
➤ 按 ALT+F8
它将打开 宏观 窗口。
➤ 选择 复制_标准号 在 巨集名称 框中，并点击 运行 .
因此，包含销售值超过100000美元的行将被复制到 顶级销售 工作表。
阅读更多：如何在Excel中使用宏复制多行（4例）。
总结
通过本文的两种方法，你就可以使用Excel VBA根据不同的标准将行从一个工作表复制到另一个工作表。 你可以将第一种方法用于文本标准，第二种方法用于数字标准。 如果你对任何一种方法有任何类型的困惑，请随时留下评论。
