word的ole类型的doc文档如何提取ObjectPool入口的嵌入文件

在Word中，OLE对象可以嵌入文档中，也可以链接到外部文件。如果一个OLE对象是嵌入到Word文档中的，你可以通过以下步骤提取ObjectPool入口的嵌入文件：

1. 打开包含OLE对象的Word文档。

2. 在菜单栏中选择“文件”（或“Office”）>“选项”>“高级”。

3. 在“高级”选项卡中，向下滚动到“显示文档内容”部分，找到“显示所有对象的ObjectPool入口”选项，并选中它。

4. 关闭选项窗口，并双击OLE对象，它会以原文件格式打开。

如果你想要一次提取多个OLE对象，可以使用VBA宏自动化这个过程。下面是一个简单的VBA宏示例，用于提取所有嵌入的OLE对象到指定文件夹：

Sub ExtractOLEObjects()
    Dim obj As Object
    Dim i As Integer
    Dim path As String
    path = "C:\temp\" '指定提取文件夹路径
    For Each obj In ActiveDocument.InlineShapes
        If obj.Type = wdInlineShapeEmbeddedOLEObject Then
            obj.OLEFormat.Activate
            obj.OLEFormat.Object.SaveAs path & "OLEObject" & i
            obj.OLEFormat.Object.Close
            i = i + 1
        End If
    Next obj
End Sub

这个宏遍历文档中所有嵌入的OLE对象，并将它们保存到指定的文件夹中，文件名以“OLEObject”和数字序号命名。你可以根据需要修改路径和文件名。