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

워크시트 작업 중 열의 특정 텍스트 위에 빈 행을 삽입해 본 적이 있습니까? 예를 들어, A열에 몇 가지 이름이 있고, 이제 왼쪽 스크린샷에 표시된 것처럼 'Mike'라는 이름이 포함된 셀 위에 빈 행을 삽입하려고 합니다. 아마도 Excel에서 이 작업을 해결할 직접적인 방법은 없을 것입니다. 이 기사에서는 Excel에서 이 작업을 처리하기 위한 몇 가지 좋은 팁에 대해 이야기하겠습니다.

VBA 코드를 사용하여 특정 텍스트 위에 빈 행 삽입

Kutools for Excel을 사용하여 특정 텍스트 위에 빈 행 삽입

VBA 코드를 사용하여 특정 텍스트 위에 빈 행 삽입

특정 텍스트 위에 수동으로 하나씩 빈 행을 삽입하면 많은 시간이 소요됩니다. 여기서는 특정 셀 값 위에 한 번에 빈 행을 삽입하는 VBA 코드를 작성하겠습니다.

1. ALT + F11 키를 누르면 Microsoft Visual Basic for Applications 창이 열립니다.

2. Insert > Module을 클릭한 다음 모듈 창에 다음 매크로를 붙여넣습니다.

VBA 코드: 특정 텍스트 위에 빠르게 빈 행 삽입

Sub test1()
'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, "Mike") > 0 Then
        Rows(xRng.Cells(i, 1).Row).Insert shift:=xlDown
      End If
    Next
End Sub

3. 그런 다음 F5 키를 눌러 이 코드를 실행하면, 원하는 특정 텍스트가 포함된 열 데이터를 선택하라는 대화 상자가 나타납니다. 스크린샷 참조:

4. 그리고 확인 버튼을 클릭하면 특정 텍스트 'Mike' 위에 빈 행이 삽입됩니다.

참고: 위의 코드에서 If InStr(1, xRng.Cells(i, 1).Value, "Mike") > 0 Then 부분의 텍스트 값 'Mike'를 원하는 다른 값으로 변경할 수 있습니다.

Kutools for Excel을 사용하여 특정 텍스트 위에 빈 행 삽입

Kutools for Excel이 있다면 Select Specific Cells 기능을 사용하여 지정된 셀 값을 먼저 선택하고, Excel의 Insert Sheet Rows 유틸리티를 적용하여 한 번에 빈 행을 삽입할 수 있습니다.

Kutools for Excel 설치 후에는 다음과 같이 하십시오:

1. 사용하려는 데이터 범위를 선택합니다.

2. 그런 다음 Kutools > Select > Select Specific Cells을 클릭합니다. 스크린샷 참조:

3. Select Specific Cells 대화 상자에서 Selection type 아래의 Cell을 선택하고, 그 다음 필요에 따라 Specific type 섹션에서 조건을 지정합니다. 이 경우, 저는 Specific type에서 Equals를 선택하고 선택하려는 이름을 입력합니다. 스크린샷 참조:

4. 그런 다음 Ok 버튼을 클릭하면 Mike 값이 있는 모든 셀이 한 번에 선택됩니다. 스크린샷 참조:

5. 특정 텍스트 셀을 선택한 후 Home > Insert > Insert Sheet Rows를 클릭하면 선택한 텍스트 위에 빈 행이 삽입됩니다. 스크린샷 참조:

지금 바로 Kutools for Excel을 다운로드하고 무료로 체험하세요!

데모: Kutools for Excel을 사용하여 특정 텍스트 위에 빈 행 삽입