vba - 使用 MergeArea 检测 VBA Excel 中的合并单元格

Question

我在这个问题上遇到了很大的问题 - 我必须从 Excel 表格中检测水平和垂直合并的单元格。我必须存储第一个单元格坐标以及合并区域的长度。我使用两个 for 循环逐行迭代该表。

如何使用 MergeArea 属性来检测合并区域和非合并区域？如果单元格未合并，它可能应该返回空范围，但是，这是:

“如果 currentRange 没有那么”

根本不起作用。有任何想法吗？非常感谢。

Answer 1

为此有一些有用的代码。

将光标置于合并单元格中，然后在即时窗口中提出以下问题:

事件单元格是合并单元格吗？

? Activecell.Mergecells
 True

合并了多少个单元格？

? Activecell.MergeArea.Cells.Count
 2

合并了多少列？

? Activecell.MergeArea.Columns.Count
 2

合并了多少行？

? Activecell.MergeArea.Rows.Count
  1

合并后的范围地址是什么？

? activecell.MergeArea.Address
  $F$2:$F$3