Note: The other languages of the website are Google-translated. Back to English

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에서 값이 변경되면 빈 행 삽입
  • 데이터 범위가 있고 이제 값이 변경 될 때 데이터 사이에 빈 행을 삽입하여 다음 스크린 샷과 같이 하나의 열에서 순차적으로 동일한 값을 분리 할 수 ​​있다고 가정합니다. 이 기사에서는이 문제를 해결할 수있는 몇 가지 트릭에 대해 설명합니다.
  • Excel에서 특정 텍스트 위에 빈 행 삽입
  • 워크 시트에서 작업 할 때 열의 특정 텍스트 위에 빈 행을 삽입 해 본 적이 있습니까? 예를 들어 A 열에 이름이 몇 개 있습니다. 이제 표시된 왼쪽 스크린 샷과 같이 "Mike"라는 이름이 포함 된 셀 위에 빈 행을 삽입하려고합니다. Excel에서이 작업을 직접 해결할 방법이 없을 수도 있습니다. . 이 기사에서는 Excel에서이 작업을 처리하는 데 유용한 몇 가지 트릭에 대해 설명합니다.

  • 슈퍼 포뮬러 바 (여러 줄의 텍스트와 수식을 쉽게 편집 할 수 있습니다.) 레이아웃 읽기 (많은 수의 셀을 쉽게 읽고 편집합니다.) 필터링 된 범위에 붙여 넣기...
  • 셀 / 행 / 열 병합 및 데이터 보관; 셀 내용 분할; 중복 행과 합계 / 평균 결합... 중복 셀 방지; 범위 비교...
  • 중복 또는 고유 선택 행; 빈 행 선택 (모든 셀이 비어 있음); 슈퍼 찾기 및 퍼지 찾기 많은 통합 문서에서; 무작위 선택 ...
  • 정확한 사본 수식 참조를 변경하지 않고 여러 셀; 참조 자동 생성 여러 시트에; 글 머리 기호 삽입, 확인란 등 ...
  • 즐겨 찾기 및 빠른 수식 삽입, 범위, 차트 및 그림; 셀 암호화 암호로; 메일 링리스트 생성 이메일 보내기 ...
  • 텍스트 추출, 텍스트 추가, 위치 별 제거, 공간 제거; 페이징 부분합을 만들고 인쇄합니다. 셀 내용과 주석 간 변환...
  • 슈퍼 필터 (다른 시트에 필터 구성표 저장 및 적용) 고급 정렬 월 / 주 / 일, 빈도 등 특수 필터 굵은 기울임 꼴로 ...
  • 통합 문서와 워크 시트 결합; 키 열을 기반으로 테이블 병합; 데이터를 여러 시트로 분할; xls, xlsx 및 PDF 일괄 변환...
  • 피벗 테이블 그룹화 기준 주 번호, 요일 등 ... 잠금 해제되고 잠긴 셀 표시 다른 색상으로; 수식 / 이름이있는 셀 강조 표시...
kte 탭 201905
  • Word, Excel, PowerPoint에서 탭 편집 및 읽기 사용, Publisher, Access, Visio 및 Project.
  • 새 창이 아닌 동일한 창의 새 탭에서 여러 문서를 열고 만듭니다.
  • 생산성을 50% 높이고 매일 수백 번의 마우스 클릭을 줄입니다!
officetab 하단
코멘트 (2)
아직 평가가 없습니다. 가장 먼저 평가하세요!
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
이것은 매우 유용합니다! 그러나 여러 다른 텍스트 뒤에 새 행을 추가하는 방법은 무엇입니까? 예를 들어 SB2와 BB2 뒤에 행을 추가하고 싶은데 가능한가요? 아니면 두 개의 다른 텍스트로 두 번 실행해야 합니까?
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
각 줄 끝에 동일한 단어를 추가한 다음 ctrl+f로 해당 단어를 삭제하여 textjoin 기능을 사용할 수 있습니다.
아직 코멘트가 없습니다
여러분의 의견을 남겨
게스트로 게시
×
이 게시물 평가 :
0   등장 인물
추천 위치

Follow Us

저작권 © 2009 - WWW.extendoffice.com. | 판권 소유. 에 의해 구동 ExtendOffice. | | 사이트 맵
Microsoft 및 Office 로고는 미국 및 / 또는 기타 국가에서 Microsoft Corporation의 상표 또는 등록 상표입니다.
Sectigo SSL로 보호