Мы разработали надстройку PowerPoint VSTO. Для работы с несколькими презентациями одновременно мы используем уникальный GUID для каждой презентации и сохраняем его в CustomDocumentProperties как , упомянутое здесь .
В Office 365 Microsoft представила новую функцию в PowerPoint, которая называется идеи дизайна. (Это последний элемент на вкладке «Дизайн»). Когда мы используем эту надстройку, интересно, что свойства CustomDocuementProperties, сохраненные в презентации, удаляются.
Он легко воспроизводится с помощью следующего кода VBA. Сначала запустите метод AddCustomProperty и проверьте его с помощью GetCustomProperty, затем используйте идеи дизайна на слайде. После этого при вызове GetCustomProperty создается исключение.
Public Sub AddCustomProperty()
On Error Resume Next
ActivePresentation.CustomDocumentProperties("PresentationID").Value = "bb999da6f94c4692b31106994636d962"
If Err.Number > 0 Then
ActivePresentation.CustomDocumentProperties.Add _
Name:="PresentationID", _
LinkToContent:=False, _
Type:=MsoDocProperties.msoPropertyTypeString, _
Value:="bb999da6f94c4692b31106994636d962"
End If
End Sub
Sub GetCustomProperty()
MsgBox ActivePresentation.CustomDocumentProperties("PresentationID")
End Sub
Я нашел решение для этого - использовать теги представления вместо CustomDocumentProperties, но текущая база кода в значительной степени опирается на более позднюю, поэтому я ищу другие, возможно, более простые альтернативы.
Кроме того, можем ли мы как-то отключить эту функцию с помощью нашей надстройки?