Question

我想修改powerpoint，以便notes部分始终包含静态文本。特别是我想添加

  <tags></tags>

创建的每张幻灯片的备注部分。我希望在主幻灯片上有一个简单的方法来做到这一点，但到目前为止谷歌博士还没有向我展示如何做到这一点。我试着将它添加到Notes Master中，但是没有用。

我对程序化解决方案持开放态度，但如果存在，则宁愿使用基于设置的解决方案。

如何在创建幻灯片时为每张幻灯片的注释部分添加文字？

Answer 1

“注释部分”可能意味着不同的事情。如果您希望在每个笔记页面上显示一些文本，它将出现在所有打印的笔记上，您只需将其添加到笔记母版中。

如果您希望它出现在每个备注页面的备注文本中（并且也会出现在普通视图中幻灯片下方的备注窗格中），我认为这是不可能的，至少不是没有已安装的加载项。

Answer 2

我也对此进行了很多研究，但似乎没有任何方法可以将预定义文本添加到幻灯片母版幻灯片下的Notes区域。

创建演示文稿后，您可以使用宏执行此操作。而不是使用＆＃34; [tag]＆＃34; ＆安培; ＆＃34; [/ tag]＆＃34;，您可以使用更容易输入的内容，如＆＃34; / 1＆＃34;和＆＃34; \ 1＆＃34;，然后使用宏来查找和替换你编号的＆＃34;带有文本等价物的标签。

这样的事情：

Dim aSlide as Slide
Dim noteShp as Shape

For each aSlide in ActivePresentation.Slides
  For Each noteShp In aSlide.NotesPage.Shapes
    If noteShp.PlaceholderFormat.Type = ppPlaceholderBody Then
      If noteShp.HasTextFrame Then
        If noteShp.TextFrame.HasText Then
          noteShp.TextFrame.TextRange.Text = Replace(noteShp.TextFrame.TextRange.Text, "/1", "<tag>")
          noteShp.TextFrame.TextRange.Text = Replace(noteShp.TextFrame.TextRange.Text, "\1", "<\tag>")
         End if
      End If
     End If
   End If
  Next
Next

我做的和你一模一样。

我在备注部分（幻灯片下方的区域普通视图中）使用html样式标签来组织信息并自动为演示文稿创建支持文档。

现在，我是通过将标签粘贴到每张幻灯片下的“注释”区域中手动完成的，但是如果有人知道每次添加新幻灯片时如何预先填充“注释”区域（通过修改幻灯片母版设置） - 不 Notes Master），这太棒了。

期待看看是否有人有解决方案！

向powerpoint添加默认注释

2 个答案: