在 PowerPoint 2007 中插入幻灯片总数

在 PowerPoint 2007 中插入幻灯片总数

是否可以将 PowerPoint 演示文稿中的幻灯片总数插入脚注中?我正在寻找一种自动化的方法。

当然我可以编辑页脚并手动添加,但如果我增加/减少幻灯片,就需要调整它。这是我们经常忘记的事情。

微软的帮助解释了如何手动执行此操作。我不敢相信 PowerPoint 没有这个功能……

答案1

如果您正在寻找一个选项或配置设置,可以自动将其添加到您创建的每个演示文稿中,那么没有。但是,如果您编辑页眉或页脚,则可以自动在那里添加幻灯片编号并让它们出现在所有幻灯片上。

http://office.microsoft.com/en-us/powerpoint/HA101181931033.aspx

答案2

这基本上密码的代码扩展为完整的可执行指南。

创建宏

  1. 在 PowerPoint 2007 及更新版本中,确保您以.pptm扩展名(允许使用宏的标准演示文稿)保存您的演示文稿。

  2. 确保已使用所述方法添加幻灯片编号在本文中1 .

  3. 打开 ”“窗口2.在 PowerPoint 2007 及更新版本中,单击View选项卡(最后一个),然后单击Macro最后一个工具栏组中的按钮。在早期版本中,Tools > Macro从菜单中选择。

  4. 为你的宏输入一个名称(例如PageCountUpdater),然后单击Create

  5. 粘贴宏代码(来自密码的回答或以下)在Sub PageCountUpdater()和之间End Sub。将van最缩进的行更改为of或您语言中类似的任何内容。

  6. 保存宏并关闭 Microsoft Visual Basic for Applications。返回 PowerPoint。

您已完成。要插入的代码(完整且带有更正的“粘合词”):

Sub PageCountUpdater()
    Dim s As Slide
    Dim shp As Shape

    For Each s In ActivePresentation.Slides
        s.DisplayMasterShapes = True
        s.HeadersFooters.SlideNumber.Visible = msoTrue

        For Each shp In s.Shapes
            If Left(shp.Name, 12) = "Slide Number" Then
                shp.TextFrame.TextRange.Text = s.SlideNumber & " of " & ActivePresentation.Slides.Count
            End If

        Next
    Next
End Sub

执行宏

  1. 打开 ””窗口。

  2. 选择已保存的PageCountUpdater宏并点击Run

每次你都必须手动执行此操作。键盘快捷键是最受欢迎的。但是……没有办法更改 PowerPoint 的快捷键,除非购买商业插件,而每台电脑的起价为 20 美元。请参阅结尾或者文章了解详细信息。

删除宏

此宏仅在需要时运行。它不是实时宏。它使用实际幻灯片计数更新字段,仅此而已。字段本身是标准文本字段。没有什么魔法。这意味着,.pptx一旦您确定演示文稿已完成并且不再添加幻灯片,您可以轻松地将文件转换回并丢弃此宏。一旦删除宏,字段将保留在原位,其值保持不变。

这很舒服,因为许多用户不喜欢带有宏的文档,并且许多演示场所、展览会、会议等根本不允许您运行.pptm文件。

这也很好,因为这个宏会在所有幻灯片上重新创建编号字段(标题除外——请参阅末尾的脚注 1),即使您手动删除它们也是如此。因此,您应该在确定幻灯片的最终编号和顺序后最后一次运行它,然后就可以删除它了。

打开启用宏的文件

如果您决定保留.pptm扩展和宏,则您将始终在禁用宏的情况下打开此文档,并且您必须Enable macros每次单击(如果您在默认设置下运行)以启用它们。

如果文档是您自己的,您相信它们不包含恶意代码并且它们都存储在安全的位置(即不在某个临时或共享文件夹中),那么您可以更改每个 Office 程序设置,以使这些文件始终在启用宏的情况下打开。

最简单的方法是将包含启用宏的演示文稿的文件夹添加到 PowerPoint 中的安全位置。

去做这个:

  1. 单击File选项卡、Options按钮、Trust Center部分和Trust Center Settings按钮。

  2. 转到Trusted locations第二部分并单击Add new location...按钮。

  3. 将文件夹路径粘贴或选择到Path字段中,并可选择检查添加位置的所有子文件夹是否也应被视为受信任。

  4. 单击OK三次确认并关闭所有打开的窗口。重新打开启用宏的文档。

从此时起,从刚刚添加的位置打开的所有文档都不应显示任何警告,并且应始终在启用宏的情况下打开。您可以在此 Office.com 支持文档

脚注

1 在大多数版本的 PowerPoint 中,含义标题幻灯片确定不是演示文稿中的第一张幻灯片,但作为任何设置为标题幻灯片的幻灯片。插入新幻灯片时,您可以看到不同的幻灯片类型。这意味着,如果您没有以标题为样式的幻灯片,则所有幻灯片都会添加页码。相反,如果您使用了许多标题幻灯片在演示中,例如为了标记不同的部分或块,你会发现所有部分或块都缺少编号。

2 所有 GUI 元素的名称都是从我的波兰语版 PowerPoint 2010 即时翻译而来。在 PowerPoint 的其他版本或语言版本中,它们可能略有不同。请进行相应调整。

答案3

首先确保每张幻灯片都有一个正常的幻灯片编号。然后添加一个模块,插入以下代码并按 F5(开始)。

Dim s As Slide
Dim shp As Shape

For Each s In ActivePresentation.Slides
    s.DisplayMasterShapes = True
    s.HeadersFooters.SlideNumber.Visible = msoTrue

    For Each shp In s.Shapes
        If Left(shp.Name, 12) = "Slide Number" Then
            shp.TextFrame.TextRange.Text = s.SlideNumber & " van " & ActivePresentation.Slides.Count
        End If

    Next
Next

答案4

我发现一个网页说,你把 x 的 <#> 放入主幻灯片中的文本框中,然后为幻灯片添加“幻灯片编号”。我让它短暂地工作,但当我移动它并再次尝试时,它不再将完整的幻灯片编号填充到 x 中。但对于大多数用户来说,这种解决方案可能是可行的。

相关内容