我有一个从另一个 SIS 下载的电子表格。我正在尝试使用函数COUNTA
。它显示所有单元格中都有内容,即使单元格中没有显示任何内容。我可以过滤和清除内容,但由于列数太多,这很耗时。我如何知道单元格中的内容,以便我可以同时清除所有单元格?
答案1
要清除伪空,请运行这个简短的宏:
Sub ClearPseudoEmpties()
Dim r As Range
For Each r In ActiveSheet.UsedRange
If r.Value = "" And Application.WorksheetFunction.CountA(r) <> 0 Then
r.ClearContents
End If
Next r
End Sub