excel中,某列数据中,只要不是4个字节的。那么所在的行就给删掉。求解 ...
发布网友
发布时间：2024-10-23 23:06
共2个回答
热心网友
时间：2024-10-23 23:50
‘例如B列
Sub 删除行()
Dim i As Long, b As Long
b = Range("B65536").End(xlUp).Row
For i = b To 1 Step -1
If Len(Range("B" & i)) <> 4 Then
Range("B" & i).EntireRow.Delete
End If
Next i
End Sub
热心网友
时间：2024-10-23 23:52
最简单的方法，在表头筛选中自定义，选择不等于，后来填入????，（四个问号），选择除表头的所有行，删除行，取消筛选。KO
