etc
엑셀 시트별 내용 합치기
- 관리자 2024.07.29 인기
-
865
0
VBA코드
--------------------------
Sub sheetMerge()
Dim i As Integer
Dim sht As Worksheet
Dim rng As Range
Set sht = Sheets(1)
For i = 2 To Sheets.Count
Set rng = sht.Cells(Rows.Count, 1).End(xlUp).Offset(1, 0)
Sheets(i).UsedRange.Copy rng
Next i
End Sub
--------------------------
매크로 실행
- 이전글영어 서수2024.07.29
- 다음글의자 형태에 따른 구분2024.07.29
댓글목록
등록된 댓글이 없습니다.