合并单元格数的Excel公式？

Microsoft Excel中是否有一个公式，将对单元格的引用作为参数，并返回合并为一个单元格的单元格数？例如，如果我合并了3个单元格，公式将为该单元格返回3；如果我将2×4单元格区域合并，公式返回8，依此类推……

考虑这个微小的自定义函数（用户定义函数）：

如果UDF返回1，单元格将独立

用户定义函数（UDF）非常易于安装和使用：

ALT-F11将显示VBE窗口

ALT-I ALT-M打开一个新模块

粘贴内容并关闭VBE窗口

如果保存工作簿，则自定义项将与工作簿一起保存。 如果在2003年以后使用Excel版本，则必须保存 将文件设置为.xlsm而不是.xlsx

要删除UDF，请执行以下操作：

如上所述打开VBE窗口

清除代码

关闭VBE窗口

要使用Excel中的自定义项，请执行以下操作：

=合并大小（A1）

要了解有关宏的更多信息，请参阅：

及

有关自定义项的详细信息：

---

必须启用宏才能工作Excel没有内置这样的功能，但编写这样的功能非常简单

Function mergedcells(rng As Range) As Integer
    mergedcells = rng.MergeArea.Cells.Count
End Function

---

如果左侧（或下方）列中有数据，则在这种情况下使用偏移函数会有所帮助。此公式计算距离合并单元格设定距离的填充单元格数

试试下面的方法 =COUNTA（偏移量（'[合并单元格范围]，0，-1））

-1将计数移动到左侧的一列 如果数据低于最终值，则为1,0）

如果周围只有空白单元格，请尝试公式

=COUNTBLANK（偏移量（'[合并单元格范围]，0，-1））

---

如果混合使用空单元格和填充单元格将公式添加到一起

Derek，则您的评论没有多大帮助。我是新来的，想给你一些好的建议。也许如果你能帮我展示一下它可以改进的地方，也许我可以编辑一下，也许会更漂亮。但像你这样的评论并没有给出任何指导或澄清，它被标记为低质量。我不知道该告诉你什么。你的名字是发表评论的人“你能把这个编辑成更好的格式吗？”

Function mergedcells(rng As Range) As Integer
    mergedcells = rng.MergeArea.Cells.Count
End Function