Excel에서 셀 / 머리글 / 바닥글에 페이지 번호를 삽입하는 방법은 무엇입니까?

Excel 파일을 인쇄할 때 인쇄된 파일을 깔끔하고 읽기 쉽게 만들기 위해 페이지에 페이지 번호를 삽입해야 할 수 있습니다. 이 문서에서는 셀, 머리글 또는 바닥글에 페이지 번호를 삽입하기 위한 몇 가지 빠른 팁을 소개하겠습니다.

한 워크시트의 머리글 / 바닥글에 페이지 번호 삽입

여러 워크시트에 걸쳐 머리글 / 바닥글에 페이지 번호 삽입

VBA 코드를 사용하여 셀에 페이지 번호 삽입

Excel에서 모든 페이지 번호를 한 번에 제거

한 워크시트의 머리글 / 바닥글에 페이지 번호 삽입

일반적으로 머리글 및 바닥글 기능을 사용하여 머리글이나 바닥글에 페이지 번호를 빠르게 삽입할 수 있습니다. 다음 단계를 따르세요:

1. 머리글이나 바닥글에 페이지 번호를 삽입하려는 워크시트로 이동합니다.

2. 그런 다음 삽입 > 머리글 및 바닥글을 클릭하면 워크시트가 페이지 레이아웃 보기로 전환됩니다. 스크린샷을 참조하세요:

3. 페이지 번호를 삽입하려는 머리글이나 바닥글을 클릭하면 리본에 머리글 및 바닥글 도구와 함께 디자인 탭이 표시됩니다. 그런 다음 디자인 > 페이지 번호를 클릭하세요. 스크린샷을 참조하세요:

4. 선택한 섹션에 &[Page] 자리 표시자가 나타나면 머리글 또는 바닥글 영역 외부를 클릭하여 페이지 번호를 표시합니다. 스크린샷을 참조하세요:

5. 이제 보기 > 일반을 클릭하여 일반 보기로 돌아갈 수 있으며, 이 워크시트를 인쇄하면 선택한 머리글 또는 바닥글에 페이지 번호가 삽입된 것을 볼 수 있습니다.

참고: 페이지 번호를 1 of 15, 2 of 15 형식으로 표시하려면 머리글 또는 바닥글 필드 상자에 &[Page] of &[Pages]를 직접 입력하기만 하면 됩니다. 스크린샷을 참조하세요:

여러 워크시트에 걸쳐 머리글 / 바닥글에 페이지 번호 삽입

위의 방법은 하나의 워크시트에 페이지 번호를 삽입하는 데 도움이 될 수 있습니다. 워크북의 모든 워크시트에 페이지 번호를 삽입하여 모든 페이지가 순차적으로 번호가 매겨지도록 하려면 다음과 같이 하세요:

1. 모든 시트 탭을 선택한 다음 페이지 레이아웃 탭으로 이동하여 페이지 설정 그룹에서 대화상자 실행기 버튼 아이콘을 클릭합니다. 스크린샷을 참조하세요:

2. 페이지 설정 대화상자에서 머리글/바닥글 탭을 클릭한 다음 사용자 정의 머리글 또는 사용자 정의 바닥글을 클릭하여 원하는 머리글 또는 바닥글을 설정합니다. 스크린샷을 참조하세요:

3. 머리글 또는 바닥글 대화상자에서 왼쪽 섹션:, 가운데 섹션:, 오른쪽 섹션: 상자 중 필요한 위치를 클릭하여 페이지 번호가 삽입될 위치를 정의한 다음 페이지 번호 삽입 아이콘을 클릭하면 자리 표시자 &[Page]가 나타납니다. 스크린샷을 참조하세요:

참고: 페이지 번호를 1 of 45, 2 of 45… 형식으로 표시하려면 머리글 또는 바닥글 필드 상자에 &[Page] of &[Pages]를 입력하세요.

4. 그런 다음 확인 > 확인을 클릭하여 대화상자를 닫습니다. 이 워크북을 인쇄하면 인쇄 미리보기에서 모든 페이지 번호가 순차적으로 머리글 또는 바닥글에 삽입된 것을 볼 수 있습니다.

VBA 코드를 사용하여 셀에 페이지 번호 삽입

머리글이나 바닥글에 페이지 번호를 삽입하는 것은 쉽지만, 워크시트 셀에 페이지 번호를 삽입해야 하는 경우 직접적인 방법은 없습니다. 다음 VBA 코드가 이 문제를 해결하는 데 도움이 될 수 있습니다.

1. 이 셀의 페이지 번호를 표시하려는 셀을 클릭합니다.

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

3. 삽입 > 모듈을 클릭하고 모듈 창에 다음 코드를 붙여넣습니다.

VBA 코드: 현재 페이지 번호를 셀에 삽입:

Sub pagenumber()
'updateby Extendoffice 20160506
    Dim xVPC As Integer
    Dim xHPC As Integer
    Dim xVPB As VPageBreak
    Dim xHPB As HPageBreak
    Dim xNumPage As Integer
    xHPC = 1
    xVPC = 1
    If ActiveSheet.PageSetup.Order = xlDownThenOver Then
        xHPC = ActiveSheet.HPageBreaks.Count + 1
    Else
        xVPC = ActiveSheet.VPageBreaks.Count + 1
    End If
    xNumPage = 1
    For Each xVPB In ActiveSheet.VPageBreaks
        If xVPB.Location.Column > ActiveCell.Column Then Exit For
        xNumPage = xNumPage + xHPC
    Next
    For Each xHPB In ActiveSheet.HPageBreaks
        If xHPB.Location.Row > ActiveCell.Row Then Exit For
        xNumPage = xNumPage + xVPC
    Next
    ActiveCell = "Page " & xNumPage & " of " & Application.ExecuteExcel4Macro("GET.DOCUMENT(50)")
End Sub

4. 그런 다음 F5 키를 눌러 이 코드를 실행하면 선택한 셀에 이 셀의 페이지 번호가 표시됩니다. 스크린샷을 참조하세요:

Excel에서 모든 페이지 번호를 한 번에 제거

모든 페이지 번호를 제거하려면 다음 단계를 적용하세요:

1. 모든 시트 탭을 선택하고 리본의 페이지 레이아웃 탭으로 이동한 다음 페이지 설정 그룹에서 대화상자 실행기 버튼 아이콘을 클릭합니다. 스크린샷을 참조하세요:

2. 페이지 설정 대화상자에서 머리글/바닥글 탭을 클릭한 다음 머리글 또는 바닥글 드롭다운 목록에서 (없음)을 선택합니다. 스크린샷을 참조하세요:

3. 그런 다음 확인 버튼을 클릭하면 워크북에서 모든 페이지 번호가 한 번에 제거됩니다.