excel中判断单元格是否有公式的两种方法

Excel中判断单元格是否有公式有两种方法，分别用宏表函数和VBA代码实现。

第一，用VBA判断单元格是否有公式的方法

打开excel后，按ALT+F11，打开VBE编辑器，单击插入――模块，然后在右边代码框复制下面代码，按F5键运行，如果单元格有公式，会弹出消息框：有公式，反之，弹出消息框：没有公式提醒。

Sub判断单元格是否有公式()
   IfRange("b2").HasFormulaThen
       MsgBox"有公式"
   Else
       MsgBox"没有公式"
   EndIf
EndSub

代码解释：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