VBS 修改office文件元数据

VBA (Visual Basic for Applications) 是一种宏语言，可以嵌入在Office应用程序中，如Excel、Word、PowerPoint等，用于自动化任务和扩展软件功能。在VBA中，你可以编写脚本来修改Office文件的元数据，比如作者、日期、版本信息等。元数据通常存储在`.docm`, `.xlsx`, 等文件的`<Properties>`部分，这是XML结构的一部分。

以下是基本步骤：

1. **启用宏**：因为VBA需要在信任环境中运行，所以在使用前，你需要在Office应用设置里启用宏（例如，在Excel中点击“文件”->“选项”->“信任中心”->“宏设置”）。

2. **编写VBA代码**：

Sub ModifyMetadata()
    Dim objDoc As Object ' 对象模型表示Word文档
    Set objDoc = CreateObject("Word.Application")
    
    ' 使用对象模型访问元数据
    With objDoc
        .Documents.Open "your_file.docx"
        
        ' 获取文档的元数据
        Dim metadata As Variant
        metadata = .ActiveDocument.BuiltInDocumentProperties
        
        ' 修改元数据，如作者
        metadata("Author") = "Your Name"
        
        ' 保存更改
        .ActiveDocument.SaveAs "new_file.docx", FileFormat:=wdFormatXMLDocument
        .ActiveDocument.Close False
    End With
    
    Set objDoc = Nothing
End Sub

记得替换`"your_file.docx"`和`"Your Name"`为你实际的文件名和作者名称。

3. **运行宏**：双击宏代码或选择“立即执行”按钮运行上述代码。