Excel에서 값이 변경될 때 페이지 나누기를 삽입하는 방법은 무엇입니까?

예를 들어, 여러 셀 범위가 있고 이제 왼쪽 스크린샷에 표시된 것처럼 열 A의 값이 변경될 때 워크시트에 페이지 나누기를 삽입하려고 합니다. 물론 하나씩 삽입할 수 있지만 한 열의 변경된 값을 기준으로 한 번에 페이지 나누기를 삽입할 수 있는 빠른 방법이 있을까요?

VBA 코드를 사용하여 값 변경 시 페이지 나누기 삽입

강력한 기능을 사용하여 값 변경 시 페이지 나누기 삽입

VBA 코드를 사용하여 값 변경 시 페이지 나누기 삽입

다음 VBA 코드는 특정 열 데이터가 변경될 때 아래에 페이지 나누기를 삽입하는 데 도움이 될 수 있습니다. 다음 단계를 따르세요:

1. ALT + F11 키를 눌러 Microsoft Visual Basic for Applications 창을 엽니다.

2. Insert > Module을 클릭하고 모듈 창에 다음 코드를 붙여넣습니다.

VBA 코드: 값 변경 시 페이지 나누기 삽입:

Sub insertpagebreaks()
'updateby Extendoffice
    Dim I As Long, J As Long
    J = ActiveSheet.Cells(Rows.Count, "A").End(xlUp).Row
    For I = J To 2 Step -1
        If Range("A" & I).Value <> Range("A" & I - 1).Value Then
            ActiveSheet.HPageBreaks.Add Before:=Range("A" & I)
        End If
    Next I
End Sub

3. 그런 다음 코드를 실행하기 위해 F5 키를 누릅니다. 열 A의 데이터가 변경될 때 모든 페이지 나누기가 시트에 삽입됩니다. 스크린샷 참조:

강력한 기능을 사용하여 값 변경 시 페이지 나누기 삽입

1. Kutools > 서식 > 열에서 변경 사항 표시를 클릭합니다. 스크린샷 참조:

2. 열에서 변경 사항 표시 대화 상자가 나타나면 다음 작업을 수행합니다:

• 사용하려는 데이터 범위와 키 열을 선택합니다;
• 옵션 박스에서 페이지 나누기를 선택합니다.

3. 확인 버튼을 클릭하면 값 변경에 따라 범위에 페이지 나누기가 삽입됩니다. 스크린샷 참조:

관련 기사 더 보기: