1. 슬라이드 마스터에 들어가서 바닥글 보이기가 활성화 돼 있는지 확인한 후 나온다.

2. Alt+F11을 클릭하여 Visual Basic Editor를 실행시킨다.

3. 삽입 -> 모듈

4. 모듈창에 아래와 같이 입력한다.
Sub dhUserPage()
Dim i As Integer, j As Integer
With ActivePresentation
j = .Slides.Count
For i = 1 To j
.Slides(i).HeadersFooters.Footer.Text = i & "/" & j
Next i
End With
End Sub

5. 실행(F5 클릭)하면 바닥글 위치에 표시된다.

P.S. 위 코드를 약간 수정하면 다른 형식으로 페이지 표시를 할 수도 있다;)

관련 글

2주간 인기글
  • 2주간 인기글이 없습니다.


Trackback Address >> http://akira999.web-bi.net/tt/trackback/185

댓글을 달아 주세요

  1. 2007/01/07 02:30  address  modify / delete  reply

    우앗 좋은 정보 :)