有時需要在Excel公式中用到合并單元格內所包含的行數或列數。例如下圖為幾類產品的數量統計，其中每種大類的產品都包含若干小類，需要在合并的單元格中得到各種小類的品種數及數量合計。由于合并單元格與各個小類單元格相對應，且各小類數量不等，因而有必要統計合并單元格內的行數。
用自定義函數可以方便地得到合并單元格內的行數或列數，方法如下。
按Alt+F11，打開VBA編輯器，單擊菜單“插入→模塊”，在代碼窗口中輸入下列代碼：
Function MergeRowsCount(Rng As Range) As Long
MergeRowsCount = Rng.MergeArea.Rows.Count
End Function
這樣就定義了一個自定義函數MergeRowsCount，它可以獲取某個合并單元格內所包含的行數。上圖中，E5單元格為5行合并的單元格，下面的公式可以返回數值5：
=MergeRowsCount(E6)
由于本例中E列或F列合并單元格內的行數不等，不能用拖動的方法填充公式，用下面的方法來批量輸入公式：
選擇E3:E12區域，在編輯欄中輸入公式：
=COUNTA(OFFSET(D3,,,MergeRowsCount(E3)))
然后按Ctrl+Enter即可將公式輸入到E列各合并單元格，該公式返回合并單元格對應C列的小類產品品種統計。用同樣的方法將下面的公式輸入到F列，在各合并單元格中即可得到小類產品的數量合計：
=SUM(OFFSET(D3,,,MergeRowsCount(E3)))
要獲取合并單元格內所包含的列數，可用下面的代碼：
Function MergeColumnsCount(Rng As Range) As Long
MergeRowsCount = Rng.MergeArea.Columns.Count
End Function
