我有一个包含定价信息的电子表格。我试图删除任何价格不以.99结尾的行。定价所在的列是第J列。所以我的代码部分如下:
Columns("J:J").NumberFormat = "@"
With Columns("J")
.AutoFilter Field:=1, Criteria1:="<>*.99", VisibleDropDown:=False
.SpecialCells(xlCellTypeVisible).EntireRow.Delete
.AutoFilter
.AutoFilter
End With
我认为将单元格从数字转换为文本格式可以让我使用&lt;&gt;评估,但它不是那样,不断抛出424对象未找到错误并指向代码中两个连续.AutoFilter行中的第一行。