Извлечение комментариев из презентации PowerPoint с помощью VBA

У меня есть PowerPoint, который содержит приблизительно 50 слайдов. Каждый слайд мог бы иметь 1 или более комментариев, предоставленных оживителем (сделанное использование вставляют-> меню комментария).

Я пытаюсь экспортировать комментарии программно в текстовый файл с помощью этого кода VBA:

    Sub ConvertComments()
    ''# Converts new-style comments to old

        Dim oSl As Slide
        Dim oSlides As Slides
        Dim oCom As Comment

        Set oSlides = ActivePresentation.Slides
        For Each oSl In oSlides
            For Each oCom In oSl.Comments
                ''# write the text to file : (oCom.Text)
                WriteToATextFile oCom.Author, <what needs to come here>, oCom.Text
            Next oCom
        Next oSl
End Sub

В вышеупомянутом коде я должен обеспечить контекст комментария также, чтобы быть записанным в текстовый файл (какая строка в слайде была выбрана и прокомментирована),

Вопрос: Есть ли какой-либо атрибут, который я могу использовать для получения этой информации?

5
задан Todd Main 27 July 2010 в 17:08
поделиться