掌握excel固定单元格技巧，让数据管理更高效
546
2024-01-13
如何在Excel中根据单元格值删除行？
如何在Excel中根据单元格值删除行？
要基于Excel中的单元格值快速删除或删除多行，您可能需要先选择包含特定单元格值的整行，然后再删除它们。 似乎没有一种快速的方法来删除基于单元格值的行，而是使用VBA代码。 这里有一些快速技巧可以帮助您。
使用查找和替换功能基于一个单元格值删除行 使用VBA代码根据一个单元格值删除行 根据一个或两个单元格值删除行 根据多个单元格值删除行 使用查找和替换功能根据单元格值删除行在Excel中，您可以应用功能强大的“查找和替换”功能轻松地基于某个单元格值删除行。 请执行以下操作：
1。 选择要根据某些单元格值删除行的范围，然后按并打开“查找和替换”对话框 Ctrl + F 键同时。
2。 在“查找和替换”对话框中，请输入特定的单元格值（在本例中，我们输入 e） 进入 Find what 框，然后单击 Find All 按钮。 请参阅下面的第一个屏幕截图：
3。 在“查找和替换”对话框的底部选择所有搜索结果，然后关闭此对话框。 （备注：您可以选择搜索结果之一，然后 Ctrl + A
键以选择所有找到的结果。 请参阅上面的第二个屏幕截图。）
然后您可以看到所有包含特定值的单元格都被选中。4。 继续右键单击所选单元格，然后选择 Delete 从右键单击菜单中。 然后检查 Entire row 在弹出的删除对话框中选择选项，然后单击 OK 按钮。 现在，您将看到所有包含特定值的单元格都被删除了。 查看以下屏幕截图：
然后已经基于该特定值删除了整行。
使用以下VBA代码，您可以快速删除具有某些单元格值的行，请执行以下步骤：
1。 按 Alt + F11 按键同时打开 Microsoft Visual Basic for applications 窗口，
2。 点击 Insert > Module，然后将以下代码输入到模块中：
VBA：根据单元格值删除整个行
Sub DeleteRows()
Updateby20211217
Dim rng As Range
Dim InputRng As Range
Dim DeleteRng As Range
Dim DeleteStr As String
Dim xTitleId As String
Dim xArr
Dim xF As Integer
Dim xWSh As Worksheet
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set rng = Application.Selection
Set InputRng = Application.InputBox("Range :", xTitleId, rng.Address, Type:=8)
If InputRng Is Nothing Then Exit Sub
DeleteStr = Application.InputBox("Delete Text", xTitleId, Type:=2)
Set xWSh = InputRng.Worksheet
For Each rng In InputRng
If rng.Value = DeleteStr Then
If DeleteRng Is Nothing Then
Set DeleteRng = rng
Else
Set DeleteRng = Application.Union(DeleteRng, rng)
Set DeleteRng = DeleteRng.EntireRow
End If
End If
Next
xArr = Split(DeleteRng.AddressLocal, ",")
DeleteRng.Select
DeleteRng.Delete
For xF = UBound(xArr) To 0 Step -1
Set DeleteRng = xWSh.Range(xArr(xF))
DeleteRng.Delete
Next
End Sub
Copy
3。 然后点击 Run 按钮运行代码。
4。 在弹出的对话框中，请选择要根据特定值删除行的范围，然后点击 OK
按钮。
5。 在另一个对话框中，请输入您要删除的行所基于的特定值，然后单击 OK
按钮。 看截图：
然后您将看到已经基于指定的值删除了整个行。
如果你已经安装 Kutools for Excel，它的 Select Specific Cells 功能可以帮助您快速删除具有特定值的行。 请执行以下操作：
Kutools for Excel - 包括 300 多个方便的 Excel 工具。 全功能免费试用 30-天，无需信用卡！ 立即行动吧!
1。 选择要根据特定值删除行的范围，然后单击 Kutools > Select > Select Specific Cells
。 看截图：
2。 在打开的“选择指定的单元格”对话框中，请检查 Entire row 选项，选择 Contains 止 Specific type 下拉列表，在右框中输入指定的值，然后单击 Ok
按钮（请参见上面的屏幕截图）。
应用此功能后，将弹出一个对话框，显示根据指定条件找到了多少个单元格。 请点击 OK按钮关闭它。
3。 现在，选择具有特定值的整个行。 请右键点击选中的行，然后点击 Delete
从右键单击菜单中。 参见下面的截图：
备注： 这个 Select Specific Cells 功能支持删除一个或两个特定值的行。 要基于两个指定值删除行，请在 Specific type“选择特定单元格”对话框的“部分”部分，如以下屏幕截图所示：
Kutools for Excel - 包括 300 多个方便的 Excel 工具。 全功能免费试用 30-天，无需信用卡！ 立即行动吧!
在某些情况下，您可能需要从Excel中的另一列/列表中删除基于多个单元格值的行。 在这里我将介绍 Kutools for Excels Select Same & Different Cells 轻松快速解决问题的功能。
Kutools for Excel - 包括 300 多个方便的 Excel 工具。 全功能免费试用 30-天，无需信用卡！ 立即行动吧!
1。 点击 Kutools > Select > Select Same & Different Cells
打开“选择相同和不同的单元格”对话框。
2。 在开幕 Select Same & Different Cells
对话框，请执行以下操作（请参见屏幕截图）：
（1）在 Find values in框，请选择您将在其中找到某些值的列；
（2）在 According to框，请选择具有多个值的列/列表，您将基于这些值删除行；
（3）在 Based on 部分，请检查 Each row选项;
（4）在 Find 部分，请检查 Same Values选项;
（5）检查 Select entire rows打开对话框底部的选项。
备注：如果两个指定的列包含相同的标题，请检查 My data has headers 选项。3。 点击 Ok 按钮以应用此实用程序。 然后出现一个对话框，显示已选择多少行。 只需点击 OK
按钮关闭它。
然后，已选择所有包含指定列表中的值的行。4。 点击 Home > Delete > Delete Sheet Rows
删除所有选定的行。
Kutools for Excel 包括适用于Excel的300多种便捷工具，可以在30天之内免费试用。 立即下载并免费试用!
最佳办公生产力工具
将小时转化为分钟 Kutools for Excel!
准备好增强您的 Excel 任务了吗？ 利用的力量 Kutools for Excel - 您终极的节省时间的工具。 简化复杂的任务并像专业人士一样浏览数据。 以闪电般的速度体验 Excel！
为什么需要 Kutools for Excel
🛠️ 超过 300 项强大功能: Kutools 包含 300 多项高级功能，可简化您在 1500 多种场景中的工作。
📈 卓越的数据处理能力：合并单元格、删除重复项并执行高级数据转换 - 所有这些都不费吹灰之力！
⏱️ 高效的批量操作：当你可以聪明地工作时，为什么还要付出额外的努力呢？ 轻松批量导入、导出、组合和调整数据。
📊 可定制的图表和报告：访问各种附加图表并生成富有洞察力的报告。
🗄️ 强大的导航窗格：通过强大的列管理器、工作表管理器和自定义收藏夹获得优势。
📝 七种类型的下拉列表：通过各种功能和类型的下拉列表使数据输入变得轻而易举。
🎓 用户友好：对于初学者来说轻而易举，对于专家来说是一个强大的工具。
立即下载，与 Excel 一起穿越时空！
阅读更多
免费下载... 采购...
Office Tab 为 Office 带来选项卡式界面，让您的工作更轻松
在Word，Excel，PowerPoint中启用选项卡式编辑和阅读，发布者，Access，Visio和Project。
在同一窗口的新选项卡中而不是在新窗口中打开并创建多个文档。
每天将您的工作效率提高50％，并减少数百次鼠标单击！
阅读更多
免费下载... 采购...
版权声明：本文内容由网络用户投稿，版权归原作者所有，本站不拥有其著作权，亦不承担相应法律责任。如果您发现本站中有涉嫌抄袭或描述失实的内容，请联系我们jiasou666@gmail.com 处理，核实后本网站将在24小时内删除侵权内容。
相关文章
推荐文章
最近发表
