병합 된 영역의 크기를 결정합니다

Question

맞아, 우리가 합병 된 세포에 대해 내리기 전에 나는 그들도 싫어하지만 어쨌든 그들을 다루어야한다. 나는 지금 또는 미래에 그것에 대해 아무것도 바꿀 수 없습니다. 내가 원하는만큼;)

병합 된 세포가 있다고 가정하면 스파가 셀의 양을 결정해야합니다. A1 : A4가 병합 된 다음 병합 된 셀 수 (4)가 반환되어야합니다. 이것을 달성 할 수있는 방법이 있습니까?

Answer 1

당신이 사용할 수있는

Dim r As range
Dim i As Integer
    Set r = range("A1")
    i = r.CurrentRegion.Count

이것은 A1 : A4 AS 4, A1 : B4를 8으로 제공합니다.

Answer 2

ActiveCell.MergeArea.Count