作者热门文章
- html - 出于某种原因,IE8 对我的 Sass 文件中继承的 html5 CSS 不友好?
- JMeter 在响应断言中使用 span 标签的问题
- html - 在 :hover and :active? 上具有不同效果的 CSS 动画
- html - 相对于居中的 html 内容固定的 CSS 重复背景?
我正在尝试从该行中的值为#N/A 的表中删除行
Sub remove_na()
Dim ws As Worksheet
Dim r As Variant
Dim i As Variant
Set ws = ThisWorkbook.ActiveSheet
r = ws.Cells(ws.Rows.Count, "A").End(xlUp).Row
For Each i In Range("A1:A" & r)
If i = "#N/A" Then i.EntireRow.Delete
Next
End Sub
我在 IF 语句中收到类型不匹配错误。我尝试使用 WHILE 循环以及 FOR。发生了同样的问题。
#N/A #N/A
#N/A #N/A
#N/A #N/A
#N/A #N/A
#N/A #N/A
#N/A #N/A
#N/A #N/A
456699.512 6523052.64
456699.512 6523052.64
456699.512 6523052.64
456699.512 6523052.64
456699.512 6523052.64
最佳答案
Sub remove_na()
Dim ws As Worksheet
Dim r As Integer
Dim i As Integer
Set ws = ThisWorkbook.ActiveSheet
r = ws.Cells(ws.Rows.Count, "A").End(xlUp).Row
For i = r To 1 Step -1
If IsError(Cells(i, 1).Value) Then Rows(i).EntireRow.Delete
Next
End Sub
关于excel - 删除包含 #N/A 的行,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/62145285/
我是一名优秀的程序员,十分优秀!