如何根据单元格值删除行

Question

我有一个工作表，我需要根据单元格值删除行。。

要检查的单元格位于A列中。。

如果单元格包含“-”。。删除行

我找不到这样做的方法...我打开一个工作簿，将所有内容复制到另一个工作簿，然后删除整个行和列，但必须根据单元格值删除特定的行。

这里需要帮助。

更新

我拥有的数据样本

Answer 1

你可以在新专栏中复制一个如下公式...

=IF(ISNUMBER(FIND("-",A1)),1,0)

...然后对该列进行排序，突出显示值为1的所有行并删除它们。

Answer 2

屏幕截图非常有用-下面的代码可以完成这项工作（假设数据位于A1开头的A列）：

Sub RemoveRows()

Dim i As Long

i = 1

Do While i <= ThisWorkbook.ActiveSheet.Range("A1").CurrentRegion.Rows.Count

    If InStr(1, ThisWorkbook.ActiveSheet.Cells(i, 1).Text, "-", vbTextCompare) > 0 Then
        ThisWorkbook.ActiveSheet.Cells(i, 1).EntireRow.Delete
    Else
        i = i + 1
    End If

Loop

End Sub

共享示例文件：https://www.dropbox.com/s/2vhq6vw7ov7ssya/RemoweDashRows.xlsm

Answer 3

最简单的方法是使用过滤器。

您可以筛选列A中没有“-”的任何单元格并复制/粘贴，或者（我更喜欢的方法）筛选所有有“-”的单元格，然后全选并删除-删除筛选器后，就可以得到所需的内容。

希望这有帮助。