我有一个很长的 Microsoft Word 文档,里面有很多插入的文件。有没有办法在文档中搜索插入的文件?我尝试使用“查找”搜索文件扩展名 (CSV),但没有找到任何结果,因此“查找”命令肯定看不到插入的文件名。
答案1
您可以使用宏来迭代所有内联形状
Sub AllInlineShapes()
For Each o In ActiveDocument.InlineShapes
If o.Type = 1 Then
Debug.Print o.Type,
If Not o.OLEFormat Is Nothing Then
Debug.Print o.OLEFormat.ClassType,
End If
If Not o.LinkFormat Is Nothing Then
Debug.Print o.LinkFormat.SourceFullName,
End If
Debug.Print "."
End If
Next
End Sub
或者,对于 Docx 文件,您可以复制一份并将其文件扩展名更改为 .zip。使用文件资源管理器或 zipviewer,您应该可以在文件夹中找到这些文件\DocMedia