麻辣家族討論版版 » PowerPoint » 如何於投影片母片中插入投影片頁數？

Trank 發表於 2011-9-11 19:09

如何於投影片母片中插入投影片頁數？

製作簡報時可於投影片母片中插入投影片編號以顯示目前投影片編號，但如何插入頁數(隨簡報頁數增減自動變更)？

infoverdad 發表於 2011-9-11 22:17

[b]回復 [url=http://forum.twbts.com/redirect.php?goto=findpost&pid=25686&ptid=4562]1#[/url] [i]Trank[/i] [/b]


    [attach]7791[/attach]

Trank 發表於 2011-9-25 00:04

嗨 infoverdad,
感謝回覆，但我的問題是除了頁碼之外如何顯示頁數，如
頁碼/頁數：1/3, 2/3, 3/3。

peter460191 發表於 2011-9-26 10:34

[b]回復 [url=http://forum.twbts.com/redirect.php?goto=findpost&pid=26289&ptid=4562]3#[/url] [i]Trank[/i] [/b]


由PowerPoint上方功能表-->檢視-->母片-->投影母片
母片下方-->頁尾或數字區域-->在<#>之後加上 /總片數

然後"關閉母片檢視"就可以了

jsleee 發表於 2011-9-27 09:26

我想 Trank 想要問的應該是 如何自動更新並顯示 總頁數 的功能，
這也是我一直困擾的問題.....
不知道 PowerPoint 有無 類似 Word 的 "功能變數" 功能？？

偉婕 發表於 2011-9-27 19:34

[b]回復 [url=http://forum.twbts.com/redirect.php?goto=findpost&pid=26289&ptid=4562]3#[/url] [i]Trank[/i] [/b]

1.將[投影片編號]顯示
2.進入[投影片母片]
3.透過[控制項]新增一個[標籤]
4.將其移至<#>的右側
5.將此標籤的順序設為[移到最上層]
6.快按此標籤二下,進入到[SlideMaster(程式碼)]
7.貼上以下程式碼[code]Sub OnSlideShowPageChange()
    For i = 1 To ActivePresentation.Slides.Count
        Label1.Caption = " / " & i
        Label1.Font = "Times New Roman"
        Label1.Font.Size = 12
    Next
End Sub[/code]8.關閉[投影片母片]
9.插入新的投影片後,可按[播放投影片]進行更新

jsleee 發表於 2011-9-29 08:05

[b]回復 [url=http://forum.twbts.com/redirect.php?goto=findpost&pid=26415&ptid=4562]6#[/url] [i]偉婕[/i] [/b]


    感謝版大的分享，經過測試可行，謝謝

peter460191 發表於 2011-9-30 10:58

[b]回復 [url=http://forum.twbts.com/redirect.php?goto=findpost&pid=26415&ptid=4562]6#[/url] [i]偉婕[/i] [/b]
請問 偉婕 ：
真的很好用，但如果簡報底色不是白色時，要如何修改這新增的白色框，謝謝您!


    [attach]8047[/attach]

偉婕 發表於 2011-9-30 16:26

[b]回復 [url=http://forum.twbts.com/redirect.php?goto=findpost&pid=26578&ptid=4562]8#[/url] [i]peter460191[/i] [/b]

至母片,選取[標籤],按[屬性]將[BackStyle]改為[0-fmBackStyleTransparent](透明)

peter460191 發表於 2011-10-4 12:53

[b]回復 [url=http://forum.twbts.com/redirect.php?goto=findpost&pid=26594&ptid=4562]9#[/url] [i]偉婕[/i] [/b]


真好用!
感謝您無私的分享。

inwuyu 發表於 2014-2-14 10:28

[b]回復 [url=http://forum.twbts.com/redirect.php?goto=findpost&pid=26415&ptid=4562]6#[/url] [i]偉婕[/i] [/b]


    您好，請問3-7的步驟是要進去哪個地方操作，完全不知道如何下手，謝謝~:L

偉婕 發表於 2014-2-15 01:17

[i=s] 本帖最後由 偉婕 於 2014-2-15 01:28 編輯 [/i]

[b]回復 [url=http://forum.twbts.com/redirect.php?goto=findpost&pid=64002&ptid=4562]11#[/url] [i]inwuyu[/i] [/b]

2010版
首先先將[開發人員]頁籤叫出來
1.按[檔案],選擇[選項]
2.出現[PowerPoint選項]視窗,左側選擇[自訂功能區]
3.[由此選擇命令]下選擇[主要定位點]
4.將右側的[開發人員]勾選
5.按[確定]

3-7的步驟是要進去哪個地方操作?.....請看下去
1.切換至[檢視],選[投影片母片]
2.切換到[開發人員]頁籤
3.在[控制項]中選按[標籤(圖示為A)]
4.於適當位置拖曳出一個適當大小,將此標籤移至<#>的右側
5.於此標籤上按右鍵,選擇[順序],再選擇[移到最上層]
6.快按此標籤二下,進入到[SlideMaster(程式碼)]
7.將原程式碼Private Sub Label2_Click()  End Sub刪除
8.貼上以下程式碼[code]Sub OnSlideShowPageChange()
For i = 1 To ActivePresentation.Slides.Count
Label1.Caption = " / " & i
Label1.Font = "Times New Roman"
Label1.Font.Size = 12
Next
End Sub[/code]9.關閉[SlideMaster(程式碼)]
10.切換到[投影片母片]頁籤,按[關閉母片檢視]
11.插入新的投影片後,按[F5]播放,即可看到效果

inwuyu 發表於 2014-2-20 10:41

[b]回復 [url=http://forum.twbts.com/redirect.php?goto=findpost&pid=64035&ptid=4562]12#[/url] [i]偉婕[/i] [/b]


    :'(  不知道哪裡出錯，照著您的步驟做，出現的只有「label1」??

偉婕 發表於 2014-2-20 15:54

[b]回復 [url=http://forum.twbts.com/redirect.php?goto=findpost&pid=64211&ptid=4562]13#[/url] [i]inwuyu[/i] [/b]

有按播放嗎?

inwuyu 發表於 2014-2-24 15:04

[b]回復 [url=http://forum.twbts.com/redirect.php?goto=findpost&pid=64233&ptid=4562]14#[/url] [i]偉婕[/i] [/b]


;P  可以了耶~所以是一定要先按「播放」嗎?好神奇啊!!真是太感謝了!!

heavenweaver 發表於 2014-2-28 22:54

[b]回復 [url=http://forum.twbts.com/redirect.php?goto=findpost&pid=64035&ptid=4562]12#[/url] [i]偉婕[/i] [/b]
實在是太強了，PowerPoint 2003 VBA Language Reference有看沒懂等於沒看，看了您的PowerPoint VBA再參照Reference才豁然開朗。

查看完整版本: 如何於投影片母片中插入投影片頁數？