如何从存储在我的硬盘位置的PowerPoint演示文稿中读取和存储演讲者备注?
using Microsoft.Office.Interop.PowerPoint;
Application PowerPoint_App = new Application();
Presentations multi_presentations = PowerPoint_App.Presentations;
Presentation presentation = multi_presentations.Open(@"D:\Peak Sourcing\Work\ppt_test\presenting.ppt");
答案 0 :(得分:1)
演示文稿幻灯片集合中的每张幻灯片都有一个NotePage成员。 NotesPage基本上是一个单独的幻灯片,包含所有相同的集合和方法。这是一个VBA函数,它将从幻灯片中返回备注文本:
函数NotesText(oSl As Slide)As String
Dim oSh As Shape
For Each oSh In oSl.NotesPage.Shapes
If oSh.Type = msoPlaceholder Then
If oSh.PlaceholderFormat.Type = ppPlaceholderBody Then
If oSh.TextFrame.HasText Then
NotesText = oSh.TextFrame.TextRange.Text
End If
End If
End If
Next
结束功能