我正在尝试找到一种简单的方法来消除工作表中的“坏”行,该工作表中有3780行。 我想知道是否有更简单的方法,而不是每次都扫描并删除每一行,这很费时间。

也许是通过创建一个宏来突出显示列范围(AL)中的单元格的宏,每次它发现位于每一行的单元格中的错误值(例如“ Apple”)时。

类似于以下内容:

If =ISTEXT() then delete row 

我希望这是有道理的,如果没有请告诉我。

#1楼 票数:1 已采纳

这个小宏将搜索AL列中任何单元格中是否存在苹果 ,并删除该行:

Sub KillBadApple()
    Dim rng As Range
    Set rng = Intersect(ActiveSheet.UsedRange, Range("A:L"))

    nLastRow = rng.Rows.Count + rng.Row - 1
    nFirstRow = rng.Row

    For i = nLastRow To nFirstRow Step -1
        exam = ""
        For j = 1 To 12
            exam = exam & Chr(1) & Cells(i, j).Text
        Next j

        exam = LCase(exam)
        If InStr(exam, "apple") > 0 Then
            Cells(i, j).EntireRow.Delete
        End If
    Next i
End Sub

  ask by andertonslase translate from so

未解决问题?本站智能推荐:

2回复

突出显示一行中特定单元格的值与上一行不同的单元格

我想应用一些条件格式,将行中的每个单元格与上一行中的单元格进行比较。 如果不同,则该行将突出显示。 我正在使用Excel2007。这甚至可能吗? 如果可以,有人可以为我提供将其应用于整个数据表的步骤吗?
2回复

如何突出显示同一范围内同一行中的选定单元格

我要在这里做的是,只要“ g”列中有一个空单元格,它将在同一行中突出显示E列中的值。 到目前为止,我得到的是,当列“ g”具有空单元格时,它将突出显示整个行。 我还想将突出显示范围设置到最后一行。 我做不到 请帮帮我。
2回复

如何基于同一行中的其他单元格动态选择特定单元格

类似于在电子表格中向下拖动单元格的方式,它将继续引用该公式同一行中的单元格。 我需要找到一种方法,可以在电子表格的I列中搜索字母Y,如果在I列中找到Y,则将在同一行中通过AR为B列选择单元格。 然后只隐藏那些单元格而不是整个行。 这是我到目前为止的内容: 谢谢,
1回复

ExcelVBA代码突出显示特定单元格的行

我创建了一个包含3张纸的电子表格: Sheet1 - Search Sheet2 - Add Data Sheet3 - Database 我想创建一个按钮(更新)以突出显示单元格D4 Sheet1的值的行(绿色)并突出显示Sheet3中的行(在第1列中,我需要在D4中插入数据以突出显示
1回复

如何基于同一行中的另一个单元格突出显示列中单元格值的所有实例?

我正在尝试使用条件格式或 VBA 来实现以下目标。 让我们假设列 A 和 B A 列包含位置列表并重复多次,例如。 位置“ANYWHERE”可以在 20 个不同的行中(但在同一列中)。 B 列包含导致数值(包括 0)或空白的 Vlookup 代码。 我想要 IF 列 B 包含一个非 0 的值来突
1回复

根据A列(ExcelVBA)中选定单元格中的值突出显示B列中的值

我想在 Excel 中根据 A 列中的相同值突出显示 B 列中的值。 一旦我选择单元格 A2,B1 和 B3 中的相同值就会用颜色突出显示。 当我选择 A3 时,B4 中的相同值用颜色突出显示。 之前突出显示的单元格 B1 和 B3 不再具有颜色。 我试图根据 Worksheet_Selection
2回复

当单元格具有特定单词时,突出显示excelmac2011中的行

在Excel 2011 Mac中(它似乎很重要,因为excel windows或mac旧版本的stackoverflow中的其他引用解决方案似乎不起作用)。 我想应用条件格式,因此当列D中的单元格包含单词“student”时,包含单元格的整行将获得一种颜色格式(蓝色用于文本白色/空填充单元格
2回复

如何选择具有最接近日期(在一列中)的特定单元格值过滤来选择特定行?

我在Excel中是个新手,必须执行这项非常复杂的任务(至少对我而言这很复杂)。 我将我正在做的事情放在这里: https : //drive.google.com/open?id=1sWHbyl-Y-GgSiX7JJ3bJ9_y8DUts-E0e 我将尽力解释我该怎么做: 对于每一行