하자 잃어버린 동생1 [기초방] VBA 100제 #28 [ 그룹 통합하기 ] 이번 문제는 시트를 추가한 후 그 이름을 통합으로 변경하는 문제가 그 첫 번째이고 통합시트에 각각의 시트의 데이터들을 모두 복사 이동하는 구문이다. 이 구문을 해결하기 위해서는 데이터가 어디에 있는지 확인하는 것이 가장 급선무이다. 각 시트의 데이터가 특정 영역에서 시작하고 끊김 없이 끝까지 데이터가 입력된 상태인 규칙적인 형태이다. 물론 특정영역부터 데이터가 입력된 영역까지로 하여 데이터를 복사해서 붙여 넣기 해도 되지만 여기서는 Usedrange가 더 바람직한 사용법이라 본다. For Each Sh In ThisWorkbook.Sheets If Sh.Name "통합" And Sh.Name "문제" Then Sh.UsedRange.Offset(1).Copy Sheets("통합").Cells(Rows.C.. 2023. 2. 5. 이전 1 다음
