如何批量导出 PowerPoint 中的备注到一个txt文本中【最简单最强版】

太长不看版

使用宏(Macro)功能(适用于 Windows 平台)

  1. 打开 PowerPoint 幻灯片,并确保每个幻灯片上都添加了备注。

  2. 启用"开发人员"选项卡:

    • 如果您已经看到 PowerPoint 的"开发人员"选项卡,请跳至下一步。
    • 如果未看到"开发人员"选项卡,请按照以下步骤启用它:
      • 点击 PowerPoint 工具栏中的"文件"选项。
      • 在文件选项中,选择"选项"。
      • 在"PowerPoint 选项"对话框中,选择"自定义功能区"。
      • 在右侧的"主选项卡"列表中,找到并选中"开发人员"选项。
      • 点击"确定"按钮。
  3. 创建宏:

    • 点击"开发人员"选项卡中的"宏"按钮。
    • 在宏对话框中,输入一个宏的名称(例如"ExportNotes")。
    • 点击"创建"按钮,将打开 Visual Basic for Applications(VBA)编辑器。
  4. 编写宏代码:

    • 在 VBA 编辑器中,将以下代码复制并粘贴到宏编辑窗口中:
    Sub ExportNotes()
        Dim Slide As Slide
        Dim Notes As String
        Dim i As Integer
        Dim FilePath As String
    
        ' 设置保存路径和文件名
        FilePath = "C:\Export\All_Notes.txt"
    
        Open FilePath For Output As #1
    
        For Each Slide In ActivePresentation.Slides
            i = i + 1
            Notes = Slide.NotesPage.Shapes.Placeholders(2).TextFrame.TextRange.Text
    
            Print #1, "Page " & i & ":"
            Print #1, Notes
            Print #1, ""
        Next Slide
    
        Close #1
    
        MsgBox "备注已导出到:" & FilePath
    End Sub
    
    • 将代码中的保存路径"C:\Export\All_Notes.txt"替换为您希望保存备注的实际路径和文件名。
  5. 运行宏:

    • 关闭 VBA 编辑器。
    • 回到 PowerPoint 中,点击"宏"按钮。
    • 在宏对话框中,选择刚才创建的宏"ExportNotes",然后点击"运行"。
  6. 完成导出:

    • 宏将逐个幻灯片遍历,并将每个幻灯片的备注按页面顺序追加到同一个文本文件中。
    • 当运行完毕后,您将收到一个

废话版

在浩如烟海的互联网搜索了一圈,除了陈年的导出html貌似已经用不了的方法,
还有就是可以看到22年教程导出讲义,但由于不知名原因一直显示ppt无法转入word遂又崩了。
干脆直接gpt了一下,你别说还真别说!!从如何打开开发者选项、从刚开始导出一页一页的备注文本到所有备注只有一个文本,我不得不说我真的是我真的是resp!!!
以上,再附上这个 gpt链接,大家可以有兴趣前往观赏~

你可能感兴趣的:(PowerPoint,powerpoint,ai)