用wordreplaceexcel中的数字值

我有Excel表格（一小部分）：

是的是的

是17.00

是＃N / A

是19.00

是24.00

是的33.00

我想用“是”replace所有的数字值。 我尝试使用isnumber，查找和replace。 但是我不能为所有的细胞做。 有人可以帮我吗？ 非常感谢你提前。

Answer 1

如果数字值是常量，则运行：

Sub YesMan() ActiveSheet.Cells.SpecialCells(2, 1).Value = "yes" End Sub