在 C# 中访问 Power Point 文件的文档属性

Question

我需要访问 Power Point 属性，例如作者、组织……

我该怎么做？

编辑：

这就是我正在尝试的：

static void TestProperties(Presentation presentation) // Microsoft.Office.Interop.PowerPoint.Presentation;
            {
                Microsoft.Office.Core.DocumentProperties properties;
                properties = (Microsoft.Office.Core.DocumentProperties)presentation.BuiltInDocumentProperties;

                Microsoft.Office.Core.DocumentProperty prop;

            }

这给了我 ClassCastException：

无法将类型为“System.__ComObject”的 COM 对象转换为接口类型“Microsoft.Office.Core.DocumentProperties”

我有一个文件选择器对话框，我可以在其中选择演示文稿和然后将其传递给 TestProperties 方法。

Answer 1

我有一个可用的 C# 代码，可以使用 OLE 自动化（Microsoft.Office.Interop.PowerPoint)：

using System;
using Microsoft.Office.Interop.PowerPoint;
using System.Reflection;

class PowerPointConverterDocumentPropertiesReaderWriter
{
    static void Main()
    {
        Application pptApplication = new Application();
        Presentation presentation = pptApplication.Presentations.Open("presentation.pptx");

        object docProperties = presentation.BuiltInDocumentProperties;
        string title = GetDocumentProperty(docProperties, "Title").ToString();
        string subject = GetDocumentProperty(docProperties, "Subject").ToString();
        string author = GetDocumentProperty(docProperties, "Author").ToString();
        string category = GetDocumentProperty(docProperties, "Category").ToString();
        string keywords = GetDocumentProperty(docProperties, "Keywords").ToString();

        SetDocumentProperty(docProperties, "Title", "new title");
        SetDocumentProperty(docProperties, "Subject", "new subject");
        SetDocumentProperty(docProperties, "Author", "new author");
        SetDocumentProperty(docProperties, "Category", "new category");
        SetDocumentProperty(docProperties, "Keywords", "new keywords");
    }

    static object GetDocumentProperty(object docProperties, string propName)
    {
        object prop = docProperties.GetType().InvokeMember(
            "Item", BindingFlags.Default | BindingFlags.GetProperty,
            null, docProperties, new object[] { propName });
        object propValue = prop.GetType().InvokeMember(
            "Value", BindingFlags.Default | BindingFlags.GetProperty,
            null, prop, new object[] { });
        return propValue;
    }

    static void SetDocumentProperty(object docProperties, string propName, object propValue)
    {
        object prop = docProperties.GetType().InvokeMember(
            "Item", BindingFlags.Default | BindingFlags.GetProperty,
            null, docProperties, new object[] { propName });
        prop.GetType().InvokeMember(
            "Value", BindingFlags.Default | BindingFlags.SetProperty,
            null, prop, new object[] { propValue });
    }
}

已通过 Microsoft PowerPoint for Office 365（版本16.0）。

感谢 https://wditot。 wordpress.com/2012/05/10/extracting-metadata-from-ms-office-docs-programmatically。

Answer 2

这样的事情对你有用吗..？更改属性[“”]以适合您的情况

Microsoft.Office.Core.DocumentProperties properties;
properties = (Microsoft.Office.Core.DocumentProperties)
    Globals.ThisWorkbook.BuiltinDocumentProperties; 
Microsoft.Office.Core.DocumentProperty prop;
prop = properties["Revision Number"];