查看PPT注释

Question

我有一个带有500+幻灯片的PPT。它有一些我想要获取/摘录的幻灯片上的评论。滚动全部500张幻灯片是很困难的。有没有办法，我可以一次得到所有的评论？

提前感谢您的帮助！！

Answer 1

您的标记提到了python，但这感觉像是一次性的问题，既然您已经有了PowerPoint，那么您可以使用VBA来解决它。如下所示：

Sub ListComments()

Dim oSl As Slide
Dim oCom As Comment
Dim sTemp As String
Dim x As Long

For Each oSl In ActivePresentation.Slides
    For Each oCom In oSl.Comments
        sTemp = sTemp & oCom.Text & vbCrLf
        For x = 1 To oCom.Replies.Count
            sTemp = sTemp & vbTab & oCom.Replies(x).Text & vbCrLf
        Next
    Next
Next

' This will "print" the result to the immediate window
' Press Ctrl+G in the VBA editor if it's not open
' If there are more comments than the window will allow,
'   you'll need to write the contents of sTemp to file or
'   do something else with it.
Debug.Print sTemp

End Sub