Excel에서 다른 모든 행에 동일한 텍스트를 삽입하는 방법은 무엇입니까?

이 문서에서는 Excel에서 다른 모든 행에 동일한 텍스트를 삽입하는 방법을 보여드리겠습니다. 자세한 내용은 계속 읽어보세요.

VBA 코드를 사용하여 매 행마다 동일한 텍스트 삽입하기
Kutools for Excel을 사용하여 다른 모든 행에 동일한 텍스트 삽입하기

VBA 코드를 사용하여 매 행마다 동일한 텍스트 삽입하기

아래 스크린샷에 표시된 것처럼 지정된 범위 내의 다른 모든 행에 “이름”, “데이터” 및 “점수”라는 텍스트를 삽입하려고 한다고 가정해 보겠습니다. 다음 VBA 코드를 시도해 보십시오.

1. 워크시트에서 Alt + F11 키를 동시에 눌러 Microsoft Visual Basic for Application 창을 엽니다.

2. 삽입 > 모듈을 클릭합니다. 스크린샷 보기:

3. 아래 VBA 코드를 복사하여 코드 편집기에 붙여넣습니다.

VBA 코드: Excel에서 매 행마다 동일한 텍스트 삽입하기

Sub inserttexteveryonerow()
	Dim Last As Integer
	Dim emptyRow As Integer
	Last = Range("A" & Rows.Count).End(xlUp).Row
	For emptyRow = Last To 2 Step - 1
		If Not Cells(emptyRow, 1).Value = "" Then
			Rows(emptyRow).Resize(1).Insert
			Range(Cells(emptyRow, "A"), Cells(emptyRow, "C")).Value = Array("Name", "Date", "Sore")
		End If
	Next emptyRow
End Sub

참고: 위의 코드에서:

Kutools for Excel을 사용하여 다른 모든 행에 동일한 텍스트 삽입하기

위의 코드를 사용하면 매 행마다 텍스트를 삽입할 수 있습니다. Excel에서 매 n번째 행에 텍스트를 삽입하려면 어떻게 해야 할까요? 이 섹션에서는 Kutools for Excel의 제목 행 삽입 기능을 보여드리겠습니다. 이 기능을 사용하면 매 n번째 행에 텍스트를 쉽게 삽입할 수 있습니다.

1. Kutools > 삽입 > 제목 행 삽입을 클릭하여 이 기능을 활성화합니다.

2. 제목 행 삽입 대화 상자에서 다음을 수행해야 합니다:

이제 선택한 범위의 매 n번째 행에 지정된 텍스트가 삽입되었습니다.