Excel中判断单元格是否有公式有两种方法,分别用宏表函数和VBA代码实现。
第一,用 VBA 判断单元格是否有公式的方法
打开excel后,按ALT+F11,打开VBE编辑器,单击插入——模块,然后在右边代码框复制下面代码,按F5键运行,如果单元格有公式,会弹出消息框:有公式,反之,弹出消息框:没有公式提醒。
Sub 判断单元格是否有公式()
If Range("b2").HasFormula Then
MsgBox "有公式"
Else
MsgBox "没有公式"
End If
End Sub
代码解释:b2表示B2单元格,上面的代码就是利用 Range.HasFormula 属性和IF语句来判断单元格是否有公式。
第二,用宏表函数判断单元格是否有公式的方法
如下图所示,B2:B6单元格区域,有些单元格有公式,有些没有,如何判断哪些单元格有公式呢?方法如下:
选择C2单元格,按ctrl+F3,调出名称管理器,新建一个名称:名称输入:公式,引用位置输入=get.cell(6,b2),确定。
然后在C2单元格输入公式:=LEFT(公式)="=",如果单元格有公式,显示TRUE,没有公式显示FALSE。
get.cell 宏表函数的用法介绍:http://www.ittribalwo.com/show.asp?id=827