在Microsoft Excel中删除行的5种最佳方法

如果您想了解如何以不同方式删除 Excel 中的一行，这是您可以在线找到的最佳教程！

Microsoft Excel 不仅仅是一款出色的数据分析和可视化软件。它还是一款出色且值得信赖的长期保存数据的应用程序。几个月后，您的工作簿就会变得非常庞大，包含许多工作表，并且这些工作表中还有行和列。

随着您不断向 Excel 工作簿添加数据，您还会删除不必要的数据，以保持文件客观且整洁。这时，就需要删除一行、移除多行或仅删除 Excel 中的空白行。

阅读本指南直至最后，了解适合不同个人和业务需求的 Excel 删除行的方法。让我们开始吧！

在 Excel 中删除行的原因

以下是最常见的情况，当你真正需要学习今天所学的这项技能时，你会觉得很有价值：

假设您正在维护一个第三方供应商数据库，您经常使用这些供应商为您的企业采购材料。其中一些供应商已经关闭了他们的业务。因此，您不再需要将这些供应商保留在工作簿中。在这里，删除行可以帮助您更新 Excel 文件。
删除包含敏感或机密信息的行可确保未经授权的用户无法访问该数据。
删除不相关或多余的行可以提高电子表格的可读性，使其他人更容易理解。
如果您的数据有错误或不准确，可以删除相应的行来纠正。
删除包含不正确或不完整信息的行以确保数据集的准确性。
您还可以删除不必要的行以简化计算或创建更简洁的可视化效果。
删除未使用的行时，可以减小文件大小并提高操作速度，尤其是在处理大型数据集时。
最后但同样重要的一点是，您可能希望消除用于测试目的的行，或者这些行在最终数据集中不再有用。

现在来了解以下在 Excel 中删除行的所有流行且智能的方法：

使用删除工具删除行

这删除命令细胞块的家选项卡允许您删除单元格、行、列和工作表。尽管删除单元格与删除行相同。请参阅下文了解如何使用此方法：

转到 Excel 工作表并突出显示要删除的单元格。
请记住，即使您选择一个单元格或整行，整行也将被删除。
去家 > 细胞 > 删除。
点击 删除下拉列表 并选择 删除工作表行。
Excel 将删除选定的数据及其行。

在上面的例子中，如果你选择 删除单元格，那么 Excel 也会删除整行，因为这是 Excel 表格 目的。

但是，如果是一个简单的 Excel 数据集，没有表格格式，您将看到一个对话框。您需要在其中进行选择 向左移动单元格 或者 上移单元格 您是否想删除突出显示的单元格。

使用右键单击上下文菜单删除行

从工作表中删除几行的另一种快捷方法是使用突出显示的行上的右键单击菜单。

首先，如果你已经确定了要删除的行，例如， 第 6 行， 右键点击 行号。然后点击删除在上下文菜单上。

其次，如果你不知道它是哪一行，但你已经确定了单元格，再次 右键点击。然后选择删除从上下文菜单中。

这删除对话框将弹出。在这里，选择整行选项来删除所选单元格的行。

使用键盘快捷键删除行

如果您喜欢使用键盘在 Excel 上导航以提高工作效率，那么您会喜欢这种方法。在这里，您可以结合使用转移， 空格键， Ctrl，和 减（-） 轻松突出显示和删除行。

首先，转到要删除的行的单元格并点击 转移 + 空格键。此操作将突出显示整行。

现在，只需按下 Ctrl + 减（-） 键删除该行。

根据单元格颜色删除行

假设，在你之前有人使用以下方法确定了 Excel 工作簿中要删除的行填色。无需手动删除使用 右键点击 方法，你可以利用 排序和过滤 工具。

转到 Excel 工作簿并 突出显示列标题 数据集。
然后，转到編輯命令块家标签。
从編輯，去 排序和过滤 并选择筛选来自 下拉列表 显示出来了。

您现在应该看到 下拉列表箭头 在您之前突出显示的所有列标题上。
如果之前整行已使用特定颜色突出显示，您可以点击 筛选器下拉菜单 在任何列标题上。
但是，如果仅突出显示单元格，则需要单击筛选单元格所在的列中的箭头。
在筛选上下文菜单，将光标悬停在筛选按颜色 菜单。
在溢出上下文菜单上，单击要删除单元格的颜色。

Excel 将过滤掉没有任何背景颜色的单元格。
现在，您已经找到了所有想要删除的行。
使用突出显示所有这些行 左键单击 并沿着行号拖动，直到所有行号都被选中。

右键点击 并选择 删除行。

现在，从編輯 > 排序和过滤 并点击筛选上下文菜单上的按钮。

太棒了！您已成功删除了几行，具体取决于它们填色属性。

另请阅读： 在Microsoft Excel中按颜色排序的5种方法

使用 Excel VBA 删除行

到目前为止，您已经了解了在 Excel 中删除行的各种手动方法。在本节中，我将解释如何使用 Excel VBA 使该过程自动化。

删除每隔一行

假设您想删除 Excel 工作表中的所有替代行。您可以使用以下 Excel VBA 脚本，只需单击几下即可实现此目的。

该宏将在活动工作表和选定行上无缝运行。您可以按照以下步骤创建宏：

按 Alt + F11 键来启动 Excel VBA 编辑器。
点击插入并选择模块。
在空白模块上，复制并粘贴以下脚本：

Sub Deletealternaterows()
  Dim rowNo, rowStart, rowFinish, rowStep As Long
  Dim rng2Delete As Range

  rowStep = 2
  rowStart = Application.Selection.Cells(1, 1).Row
  rowFinish = ActiveSheet.UsedRange.SpecialCells(xlCellTypeLastCell).Row

  Application.ScreenUpdating = False
  Application.Calculation = xlCalculationManual

  For rowNo = rowStart To rowFinish Step rowStep
      If Not rng2Delete Is Nothing Then
          Set rng2Delete = Application.Union(rng2Delete, _
           ActiveSheet.Cells(rowNo, 1))
      Else
          Set rng2Delete = ActiveSheet.Cells(rowNo, 1)
      End If
  Next
  If Not rng2Delete Is Nothing Then
      rng2Delete.EntireRow.Delete
      ' Hide every other row
      'rng2Delete.EntireRow.Hidden = True
  End If

  Application.ScreenUpdating = True
  Application.Calculation = xlCalculationAutomatic
End Sub

点击节省按钮。

按回去按钮 微软 Excel 对话框。

您应该看到 另存为 对话。
点击 保存类型 下拉列表并选择 Excel 启用宏的工作簿 选项。
打节省按钮。
关上 Excel VBA 编辑器。

现在，按 Alt + F8 键盘上的键来启动 宏对话框。在那里，选择 删除交替行 宏并点击跑步按钮执行。

删除包含突出显示单元格的行

例如，您想手动突出显示工作表上的几个单元格，Excel 将删除相应的行。您可以使用此脚本创建 VBA 宏来实现此目的：

Sub DeleteRowsBasedOnSelectedCells()
    Dim selectedRange As Range
    Dim selectedCell As Range
    Dim rowToDelete As Long
    
    ' Check if any cells are selected
    If Selection.Cells.Count > 0 Then
        ' Loop through each selected cell
        For Each selectedCell In Selection
            ' Get the row number of the selected cell
            rowToDelete = selectedCell.Row
            
            ' Delete the entire row
            Rows(rowToDelete).Delete
        Next selectedCell
    Else
        MsgBox "No cells selected. Please select cells before running this macro.", vbExclamation
    End If
End Sub

根据输入删除行

假设您希望 Excel 提示您删除行。您可以使用以下脚本轻松实现此目的：

Sub DeleteRowsBasedOnUserInput()
    Dim rowToDelete As Long
    Dim response As Variant
    
    ' Loop until the user clicks "Cancel"
    Do
        ' Prompt the user for the row number
        response = InputBox("Enter the row number to delete (or click Cancel to exit):", "Delete Row")
        
        ' Check if the user clicked "Cancel" or entered a valid row number
        If response = "" Then
            Exit Sub ' User clicked "Cancel"
        ElseIf IsNumeric(response) Then
            rowToDelete = CLng(response)
            
            ' Check if the row number is within a valid range
            If rowToDelete >= 1 And rowToDelete

该脚本将在活动工作表上运行。因此，如果您想删除 Excel 工作簿中另一个工作表上的几个指定行，请导航到该工作表，然后运行该宏。

您可以创建 表单控件 使用上述 VBA 脚本来添加按钮，为您和其他可能访问工作簿的用户提供更多便利。阅读这篇精彩的文章，了解 VBA 表单控件 在 Excel 中。

结论

总之，掌握 Excel 中删除行的技巧是一项基本技能。本文探讨的方法提供了多种工具包，可满足各种用户偏好和场景的需求。

对于快速和直接地删除一行，“删除”工具作为一个用户友好的选项脱颖而出，非常适合 Excel 学习者。

同时，如果您喜欢使用鼠标驱动的方法，右键单击上下文菜单为您提供了一种快捷方式，只需单击几下即可简化流程。

如果您是高级用户和键盘爱好者，您会欣赏键盘快捷键方法的效率，它允许以最小的努力删除行。

对于更专业的任务，例如根据单元格颜色删除行，本文介绍了一种在数据管理中添加自定义层的方法。

最后，如果您追求自动化和多功能性，Excel VBA 是最佳选择。它支持创建用于删除行的个性化脚本。

尝试上述方法，并在下方评论您最喜欢哪种方法。此外，如果我错过了更好的方法来删除 Excel 中的一行，请在您的评论中提及。