Excel에서 특정 텍스트 뒤에 빈 행을 삽입하는 방법은 무엇입니까?

다음 스크린 샷과 같이 특정 텍스트 뒤에 빈 행을 삽입하려면 수동으로 하나씩 삽입하지 않고 빠르고 쉽게 처리하는 방법은 무엇입니까?

VBA 코드로 특정 텍스트 뒤에 빈 행 삽입

VBA 코드로 특정 텍스트 뒤에 빈 행 삽입

아래 VBA 코드를 적용하여 필요한 특정 텍스트 뒤에 빈 행을 삽입 할 수 있습니다. 다음과 같이하십시오.

1. 누르고 ALT + F11 키를 눌러 응용 프로그램 용 Microsoft Visual Basic 창.

2. 딸깍 하는 소리 끼워 넣다 > 모듈을 클릭하고 모듈 창에 다음 코드를 붙여 넣습니다.

VBA 코드 : 특정 텍스트 뒤에 빈 행 삽입

Sub Insertrowbelow()
'updateby Extendoffice
    Dim i As Long
    Dim xLast As Long
    Dim xRng As Range
    Dim xTxt As String
    On Error Resume Next
    xTxt = Application.ActiveWindow.RangeSelection.Address
    Set xRng = Application.InputBox("please select the column with specific text:", "Kutools for Excel", xTxt, , , , , 8)
    If xRng Is Nothing Then Exit Sub
    If (xRng.Columns.Count > 1) Then
        MsgBox "the selected range must be one column", , "Kutools for Excel"
        Exit Sub
    End If
    xLast = xRng.Rows.Count
    For i = xLast To 1 Step -1
      If InStr(1, xRng.Cells(i, 1).Value, "In progressing") > 0 Then
        Rows(xRng.Cells(i + 1, 1).Row).INSERT shift:=xlDown
      End If
    Next
End Sub

주의 사항: 위 코드에서 텍스트 값 "진행 중”을 스크립트에서 원하는 다른 값으로 If InStr (1, xRng.Cells (i, 1) .Value, "In progressing")> 0 Then.

3. 그런 다음, F5 이 코드를 실행하려면 튀어 나온 대화 상자에서 사용하려는 특정 텍스트가 포함 된 열 데이터를 선택합니다. 스크린 샷 참조 :

4. 그런 다음 OK 버튼을 클릭하고 지정한 특정 텍스트 뒤에 빈 행이 삽입되었습니다. 스크린 샷을 참조하십시오.

보다 상대적인 삽입 행 기사 :

행을 여러 번 복사 및 삽입하거나 행을 X 번 복제
일상 업무에서 한 행 또는 각 행을 복사 한 다음 워크 시트의 현재 데이터 행 아래에 여러 번 삽입 해 본 적이 있습니까? 예를 들어, 셀 범위가 있습니다. 이제 다음 스크린 샷과 같이 각 행을 복사하여 다음 행에 3 번 붙여넣고 싶습니다. Excel에서이 작업을 어떻게 처리 할 수 있습니까?

Excel에서 값이 변경되면 빈 행 삽입
데이터 범위가 있고 이제 값이 변경 될 때 데이터 사이에 빈 행을 삽입하여 다음 스크린 샷과 같이 하나의 열에서 순차적으로 동일한 값을 분리 할 수 있다고 가정합니다. 이 기사에서는이 문제를 해결할 수있는 몇 가지 트릭에 대해 설명합니다.

Google 스프레드 시트에 여러 행 또는 열을 빠르게 삽입
이 기사에서는 Google 시트에 여러 개의 빈 행이나 열을 삽입하는 쉬운 방법을 소개합니다.

Excel에서 특정 텍스트 위에 빈 행 삽입
워크 시트에서 작업 할 때 열의 특정 텍스트 위에 빈 행을 삽입 해 본 적이 있습니까? 예를 들어 A 열에 이름이 몇 개 있습니다. 이제 표시된 왼쪽 스크린 샷과 같이 "Mike"라는 이름이 포함 된 셀 위에 빈 행을 삽입하려고합니다. Excel에서이 작업을 직접 해결할 방법이 없을 수도 있습니다. . 이 기사에서는 Excel에서이 작업을 처리하는 데 유용한 몇 가지 트릭에 대해 설명합니다.

최고의 사무 생산성 도구

Excel용 Kutools는 대부분의 문제를 해결하고 생산성을 80% 증가시킵니다.

슈퍼 포뮬러 바 (여러 줄의 텍스트와 수식을 쉽게 편집 할 수 있습니다.) 레이아웃 읽기 (많은 수의 셀을 쉽게 읽고 편집합니다.) 필터링 된 범위에 붙여 넣기...
셀 / 행 / 열 병합 및 데이터 보관; 셀 내용 분할; 중복 행과 합계 / 평균 결합... 중복 셀 방지; 범위 비교...
중복 또는 고유 선택 행; 빈 행 선택 (모든 셀이 비어 있음); 슈퍼 찾기 및 퍼지 찾기 많은 통합 문서에서; 무작위 선택 ...
정확한 사본 수식 참조를 변경하지 않고 여러 셀; 참조 자동 생성 여러 시트에; 글 머리 기호 삽입, 확인란 등 ...
즐겨 찾기 및 빠른 수식 삽입, 범위, 차트 및 그림; 셀 암호화 암호로; 메일 링리스트 생성 이메일 보내기 ...
텍스트 추출, 텍스트 추가, 위치 별 제거, 공간 제거; 페이징 부분합을 만들고 인쇄합니다. 셀 내용과 주석 간 변환...
슈퍼 필터 (다른 시트에 필터 구성표 저장 및 적용) 고급 정렬 월 / 주 / 일, 빈도 등 특수 필터 굵은 기울임 꼴로 ...
통합 문서와 워크 시트 결합; 키 열을 기반으로 테이블 병합; 데이터를 여러 시트로 분할; xls, xlsx 및 PDF 일괄 변환...
피벗 테이블 그룹화 기준 주 번호, 요일 등 ... 잠금 해제되고 잠긴 셀 표시 다른 색상으로; 수식 / 이름이있는 셀 강조 표시...