时间戳

首页 > 解决方案 > 是否可以在不过滤列的情况下复制/粘贴所有带有#N/A 的行？

excel - 是否可以在不过滤列的情况下复制/粘贴所有带有#N/A 的行？

问题描述

我很好奇是否可以复制所有带有#N/A（公式错误）的行，这些行出现在一张纸的多列中（他们将字段编号电子表格更改为电子表格），然后将它们粘贴到另一个？

我当前用于代码的内容需要选择特定列（本示例中的字段 44）。由于带有#N/A 的列不是静态的，我正在寻找一种方法来复制所有具有#N/A 的行而不进行过滤。这是可能的还是没有办法绕过现场要求？

Sheets("Fall 2016").Select
Range("$A$2:$CU$" & lrow).AutoFilter Field:=44, Criteria1:="#N/A"
Range("$A$3:$CU$" & lrow).Copy

Sheets("Sheet1").Select
Range("A3").PasteSpecial Paste:=xlPasteValues
Application.CutCopyMode = False

标签： excelvbaexcel-formula

解决方案

使用 SpecialCells 查找从公式返回的所有错误。

dim lrow as long, erng as range

with workSheets("Fall 2016")

    lrow = 'get lrow here

    on error resume next
    set erng = .range("A2:CU" & lrow).specialcells(xlCellTypeFormulas, xlErrors)
    on error goto 0

    if not erng is nothing then
        intersect(.range("A:CU"), erng.entirerow).copy
        workSheets("Sheet1").Range("A3").PasteSpecial Paste:=xlPasteValues
    end if


end with

推荐阅读