Jackie는 바닥 글에있는 페이지 번호에 선행 0을 포함하는 방법이 있는지 물었습니다. 그녀는 길이를 채우려면 페이지 번호가 항상 5 자 길이 여야하고 필요에 따라 앞에 0이 있어야합니다. 따라서 페이지 번호는 00001, 00002 등이됩니다.

Excel은 페이지 번호에 대해 좋은 서식을 제공하지 않습니다. 한 가지 해결책 (아마 가장 실용적인 방법)은 워크 시트의 각 페이지를 한 번에 하나씩 인쇄하여 페이지 번호를 변경하는 것입니다. 이 매크로는 다음과 같은 접근 방식을 취합니다.

Sub FormattedPageNums()

Dim iPages As Integer     Dim J As Integer     Dim sFormat As String

sFormat = "00000"

' Get count of pages in active sheet     iPages = ExecuteExcel4Macro("Get.Document(50)")



With ActiveSheet         For J = 1 To iPages             .PageSetup.CenterFooter = Format(J, sFormat)

.PrintOut From:=J, To:=J         Next J     End With End Sub

매크로는 전체 인쇄물에 몇 페이지가 있는지 확인한 다음 해당 인쇄물의 각 페이지를 단계별로 실행합니다. 각 페이지를 개별적으로 인쇄하기 전에 .CenterFooter 속성은 앞에 0이있는 페이지 번호를 나타내는 서식이 지정된 문자열과 동일하게 설정됩니다.

원하는대로 매크로를 수정하여 바닥 글에 다른 정보를 배치 할 수 있습니다. .CenterFooter 대신 .LeftFooter 또는 .RightFooter를 사용하여 변경된 바닥 글 영역을 변경할 수도 있습니다.

_ 참고 : _

이 페이지 (또는 ExcelTips 사이트의 다른 페이지)에 설명 된 매크로를 사용하는 방법을 알고 싶으면 유용한 정보가 포함 된 특별 페이지를 준비했습니다.

link : / excelribbon-ExcelTipsMacros [새 브라우저 탭에서 특별 페이지를 열려면 여기를 클릭하세요].

_ExcelTips_는 비용 효율적인 Microsoft Excel 교육을위한 소스입니다.

이 팁 (3055)은 Microsoft Excel 97, 2000, 2002 및 2003에 적용됩니다. 여기에서 Excel (Excel 2007 이상)의 리본 인터페이스에 대한이 팁의 버전을 찾을 수 있습니다.

link : / excelribbon-Leading_Zeros_in_Page_Numbers [페이지 번호의 선행 0].