일상 업무에서 한 행 또는 각 행을 복사 한 다음 워크 시트의 현재 데이터 행 아래에 여러 번 삽입 해 본 적이 있습니까? 예를 들어, 셀 범위가 있습니다. 이제 다음 스크린 샷과 같이 각 행을 복사하여 다음 행에 3 번 붙여넣고 싶습니다. Excel에서이 작업을 어떻게 처리 할 수 있습니까?
VBA 코드로 특정 행을 여러 번 복사 및 삽입특정 행 하나만 x 번 복제하려면 다음 VBA 코드가 도움이 될 수 있습니다. 다음과 같이하십시오. 1. 여러 번 복사 및 삽입 할 행을 지정한 다음 ALT + F11 키를 누른 다음 응용 프로그램 용 Microsoft Visual Basic 창. 2. 딸깍 하는 소리 끼워 넣다 > 모듈을 클릭하고 다음 코드를 모듈 창문. VBA 코드 : 특정 행 하나를 여러 번 복제합니다. Sub test() 'Updateby Extendoffice Dim xCount As Integer LableNumber: xCount = Application.InputBox("Number of Rows", "Kutools for Excel", , , , , , 1) If xCount < 1 Then MsgBox "the entered number of rows is error, please enter again", vbInformation, "Kutools for Excel" GoTo LableNumber End If ActiveCell.EntireRow.Copy Range(ActiveCell.Offset(1, 0), ActiveCell.Offset(xCount, 0)).EntireRow.Insert Shift:=xlDown Application.CutCopyMode = False End Sub3. 코드를 붙여 넣은 후 F5 키를 눌러이 코드를 실행하면 복제 할 횟수를 입력하라는 메시지 상자가 나타납니다. 스크린 샷을 참조하십시오. 4. 그런 다음 OK 버튼을 클릭하고 세 개의 새로운 복사 된 행이 선택한 행 아래에 삽입되었습니다. 스크린 샷 참조 : 특정 번호를 기준으로 각 행을 여러 번 쉽게 복사 및 삽입 일반적으로 수동 복사 및 삽입 처리를 제외하고 행을 여러 번 복사 및 삽입하는 좋은 방법은 없습니다. 하지만 함께 Excel 용 Kutools's 셀 값을 기반으로 행 / 열 복제 이 문제를 쉽게 해결할 수 있습니다. Excel 용 Kutools를 다운로드하려면 클릭하십시오! Excel 용 Kutools: 300 개 이상의 편리한 Excel 추가 기능으로 60 일 동안 제한없이 무료로 사용해 볼 수 있습니다. 지금 다운로드 및 무료 평가판! VBA 코드로 각 행을 여러 번 복사 및 삽입범위에서 각 행을 여러 번 복제하려면 다음 VBA 코드를 적용 할 수 있습니다. 다음과 같이하십시오. 1. 누르고 ALT + F11 키를 누른 다음 응용 프로그램 용 Microsoft Visual Basic 창. 2. 딸깍 하는 소리 끼워 넣다 > 모듈을 클릭하고 다음 코드를 모듈 창문. VBA 코드 : 각 행을 여러 번 복제합니다. Sub insertrows() 'Updateby Extendoffice Dim I As Long Dim xCount As Integer LableNumber: xCount = Application.InputBox("Number of Rows", "Kutools for Excel", , , , , , 1) If xCount < 1 Then MsgBox "the entered number of rows is error ,please enter again", vbInformation, "Kutools for Excel" GoTo LableNumber End If For I = Range("A" & Rows.CountLarge).End(xlUp).Row To 2 Step -1 Rows(I).Copy Rows(I).Resize(xCount).Insert Next Application.CutCopyMode = False End Sub3. 그런 다음 F5 키를 눌러이 코드를 실행하면 각 레코드에 대해 복제 할 횟수를 입력하라는 메시지 상자가 나타납니다. 스크린 샷을 참조하십시오. 4. 그런 다음 OK, 각 행이 복사되어 활성 행 아래에 3 번 삽입되었습니다 (스크린 샷 참조). 주의 사항: 위 코드에서 A 데이터가 열에서 시작하는 경우 데이터 범위가 열 A에서 시작됨을 나타냅니다. K, 바꿔주세요 A 에 K 당신의 필요로. 멋진 기능으로 특정 번호를 기준으로 각 행을 여러 번 복사하고 삽입하십시오.아마도 VBA 코드에 익숙하지 않거나 코드로 인해 데이터가 충돌 할까 걱정할 수 있습니다. 여기에서는 유용한 기능을 소개하겠습니다. Excel 용 Kutools's 셀 값을 기반으로 행 / 열 복제,이 유틸리티를 사용하면 지정한 번호에 따라 행을 빠르게 복사하고 삽입 할 수 있습니다. 팁 :이것을 적용하려면 셀 값을 기반으로 행 / 열 복제 먼저 기능을 다운로드해야합니다. Excel 용 Kutools을 클릭 한 다음 기능을 빠르고 쉽게 적용하십시오. 설치 후 Excel 용 Kutools, 다음과 같이하십시오. 1. 데이터 옆의 셀 목록에서 행을 복제하려는 반복 번호를 입력하십시오. 스크린 샷을 참조하십시오. 2. 딸깍 하는 소리 쿠툴 > 끼워 넣다 > 셀 값을 기반으로 행 / 열 복제, 스크린 샷 참조 : 3. 에서 행과 열 복사 및 삽입 대화 상자에서 행 복사 및 삽입 에서 옵션 거래증명방식 섹션에서 복제하려는 데이터 범위를 선택한 다음 행을 복제 할 반복 시간을 지정합니다. 스크린 샷을 참조하십시오. 4. 그런 다음 Ok or 신청 버튼을 클릭하면 필요에 따라 다음과 같은 결과가 표시됩니다. Excel 용 Kutools 및 무료 평가판을 지금 다운로드하려면 클릭하십시오! 최고의 사무 생산성 도구Excel 용 Kutools는 대부분의 문제를 해결하고 생산성을 80 % 향상시킵니다.
Office Tab은 Office에 탭 인터페이스를 제공하여 작업을 훨씬 쉽게 만듭니다.
|