[Excel] Cell Merge 여부 확인 및 값 읽기

셀이 병합 되었는지 확인하는 방법과 병합된 셀의 값을 읽는 방법입니다.  

 

 

Cell 이 병합이 되면 맨왼쪽 위의 데이터만 남고 나머지는 삭제를 하게 됩니다.

 

 

 

아래 샘플을 보면

 

ActiveSheet.Cells(5, "B").value를 확인해 보면 아무데이터도 남아 있지 않습니다. 

 

 

 

## Cell 병합여부 확인

 

해당 셀이 병합이 되었는지 확인하려면  MergeCells 속성을 확인하시면 됩니다. 

 

ActiveSheet.Cells(5, "B").MergeCells

 

Merge가 되었는지 아닌지를 True 또는 False로 반환을 하게 됩니다. 

 

 

 

## 병합된 Cell 값 확인

 

Merge된 값을 확인하려면 MergeArea.Cells(1, 1).Value 값을 확인하시면 됩니다. 

Merge 된 범위에서 1,1 위치의 값을 가져옵니다. 

 

ActiveSheet.Cells(i, "B").MergeArea.Cells(1, 1).Value

 

 

 

 

 

## Macro Code

 

Sub CheckValue()

    

    For i = 3 To 18

    

        ActiveSheet.Cells(i, "D").Value = ActiveSheet.Cells(i, "B").MergeCells

        ActiveSheet.Cells(i, "E").Value = ActiveSheet.Cells(i, "B").MergeArea.Cells(1, 1).Value

    

    Next i

    

 

End Sub

MergedCellValue.zip

0.01MB