我正在尝试找到一种使用#na查找行的方法,以便我可以复制该行并在另一个标签中将其过去,以便可以分析错误。
到目前为止,我有以下内容,但我有一些问题
Dim iCntr As Long
Dim lastColumn As Long
For iCntr = Cells(Rows.Count, "A").End(xlUp).Row To 1 Step -1
For lastColumn = Cells.Find(What:="*", SearchDirection:=xlPrevious, SearchOrder:=xlByColumns).Column To 1 Step -1
If Cells(iCntr, lastColumn).Text = "#N/A" Then
MsgBox "row" & iCntr
End If
Next
Next
首先,代码似乎没有找到#N / A错误的单元格。我不确定为什么。
另外,我有60K行和50列,尝试运行上面的代码需要很长时间。我希望代码一旦找到#N / A就跳转到下一行,因为不需要检查其余的列
关于如何解决以前的观点的任何想法?
目前我只是在显示一个消息框,但我的目的是在找到#N / A后复制所有行,然后将其复制到另一页的另一页。
答案 0 :(得分:3)
您正在尝试找到字符串" #N / A" - 那样不行。 Excel具有IsNA()功能,在VBA中可以使用printf
希望这有帮助。