如何检测列中合并单元格，存在则第14行留空否则执行指定公式

方案1：VBA自定义函数（可自动适配合并单元格变更） #

1. 按Alt+F11打开VBA编辑器，右键点击你的工作簿名称选择「插入」→「模块」
2. 粘贴如下代码到模块中：

Function 列存在合并单元格(col As Range) As Boolean
    列存在合并单元格 = col.EntireColumn.MergeCells
End Function

3. 回到表格界面，在第14行对应单元格输入公式：
   =IF(列存在合并单元格(A:A),"",此处替换为你截图中的原有计算公式)

公式里的A:A替换为当前列的整列引用即可，下拉/右拉可自动适配其他列。

方案2：无宏原生公式方案（适合禁用宏的场景） #

1. 选中整张表格区域，按Ctrl+G调出定位窗口，点击「定位条件」→勾选「合并单元格」→确定，此时所有合并单元格会被全选
2. 光标移到表格左上角的名称框（输入栏左边的空白框），输入所有合并区域，按回车完成名称定义
3. 在第14行对应单元格输入公式：
   =IF(SUMPRODUCT(--(ISNUMBER(MATCH(COLUMN(),COLUMN(所有合并区域),0))))>0,"",此处替换为你截图中的原有计算公式)

如果后续调整了表格的合并单元格，需要重新执行步骤1-2更新所有合并区域的范围。

内容的提问来源于stack exchange，提问作者cjwrk