根据单元格值删除2列

Question

我有一个Access函数，可以将查询导出到Excel。有15个结果的空格。但是，并不是所有的都被使用，所以我想删除空白列。

我一直试图在Lrow + 1中搜索“ 0.000”，然后删除整列，但是它不起作用。 0.000是一个公式，但我使用的是.Value方法，所以这不应该是问题，对吧？

这是我尝试编写的代码（但不幸失败了）：

For Each Cel In wks.Range("C" & Lrow + 1, "V" & Lrow + 1)
If Cel.Value = "0.000" Then
Cel.EntireColumn.Delete
Cel.Offset(0, 1).EntireColumn.Delete
End If
Next Cel

如图所示，有2个结果。这就是我想发生的事情：搜索行+ 1（具有0.000的行），删除这些列以及其旁边的列。

任何帮助将不胜感激。