Question

您好我有一个包含REF错误的单元格的Excel，我想删除包含这些错误的行，而不是删除下面的剩余单元格。我尝试了各种代码，但只有单元格本身删除，因为我不知道如何合并行编码。这是我使用过的示例代码。

  Sub Check_Ref()

   Dim rng As Range
   Dim rngError As Range

   Set rng = Sheets("Sheet4").Range("A1:Z100")
   On Error Resume Next
       Set rngError = rng.Cells.SpecialCells(xlCellTypeFormulas, xlErrors)
   On Error GoTo 0
   If Not rngError Is Nothing Then
       rngError.ClearContents
   End If

   'For Each cell In rng

End Sub

Answer 1

使用Range.EntireRow property扫描行。

您可以互换地使用Range.ClearContents method和Range.Delete method的字词。它们不是一回事。

If Not rngError Is Nothing Then
     'rngError.EntireRow.ClearContents
     rngError.EntireRow.Delete
End If

删除包含“#REF”错误的单元格的行

1 个答案: