VBA 통한 셀 자동 선택 및 병합 .Merge시 선택 영역이 바뀐다?(도와주세요!!!)

안녕하세요,

VBA 통해 자동 병합을 하려고 합니다.

For문 안에서 인접한 셀을 찾은 다음, merge를 하려고 하는데, 엉뚱한 곳을 merge합니다.

셀을 .select하면 원하는 영역을 잘 판단하는데,

그 뒤에 selection.merge를 하면 앞의 .select가 엉뚱한 곳을 설정하여 병합해버립니다.

같은 문제를 가지고 계셨던 분이 있으신지 문의드립니다.

(회사 보안때문에 파일은 첨부드리지 못합니다ㅠㅠ)

*******************************************************************************************************

#Debugging

Dim cell1 As Range

For (i, j 돌아가는 중)

Set cell1 = Range(cell1.Offset(i,0), cell1.Offset(j,0))

cell1.Select

End if

---------------------------->>> 원하는 인접 셀 영역 설정

Dim cell1 As Range

For (i,j 돌아가는 중)

Set cell1 = Range(cell1.Offset(i,0), cell1.Offset(j,0))

cell1.Select

Selection.Merge

End if

--------------------------->>> 원하지 않는 인접 셀 영역 설정 및 병합