Excel如何用VBA判断单元格存在公式？

1、打开Excel数据表，如下图所示，其中部分单元格含有公式，部分没有，利用VBA判断选择的单元格中是否存在公式。

2、按下Alt+F11键，打开VBA编辑界面，双击数据所在工作表，如下图所示。

3、VBA中可以利用单元格的HasFormula属性来判断其中是否含有公式，输入代码：

Sub 鱼木混猪()

If Selection.HasFormula = True Then

MsgBox "存在公式"

Else

MsgBox "不存在公式"

End If

End Sub

如下图所示。

4、选择一个单元格，按下Alt+F8组合键，打开宏对话框，选择上述步骤中的代码，点击“执行”，如下图所示。

5、如果单元格中存在公式，则会弹窗提示“存在公式”，反之，则提示“不存在公式”，如下图所示。

1、1.打开Excel数据表；

2.Alt+F11，双击数据工作表；

3.输入代码，核心代码：

If Selection.HasFormula = True Then

4.选择单元格，Alt+F8，点击“执行”；

5.就会弹框提示是否存在公式。