有一个HasFormula
你可以运行的测试。
您需要选择范围然后运行宏或更改For each cel in Selection
为For each cel in [A1:B25]
(更改[A1:B25]
为您想要的任何范围)
Sub CheckFormulas()
Dim cel as Range
For each cel in Selection
If cel.HasFormula then
’Whatever you want to do the formula cell here
Else
’Whatever you want to do to the non formula cell here
End if
Next cel
End sub
本文收集自互联网,转载请注明来源。
如有侵权,请联系[email protected] 删除。
我来说两句