Excel OLE Objects 嵌入路径位置

Question

如标题所述，我还没有找到一种方法来检索嵌入的名称 object 或其路径（附图）

在提供的示例中，我想至少获得完整路径位置或 67CE8... 名称 - 因为我知道它们存储在 Temp 文件夹中 - 所以我可以通过 VBA。我试过“.SourceName”，但没有成功，因为它似乎只能获得超链接（但没有真正的超链接，因此出现错误 1004）。
编辑评论中的代码:

ActiveSheet.OLEObjects.Add(Filename:= _ "https://...dummylink" _ , Link:=False, DisplayAsIcon:=False).Select x = Selection.Name Selection.Verb Verb:=xlPrimary

Answer 1

查看图像中的图标，您插入了一个文件对象并且未勾选 'Link to file' 意味着（如您所引用的）它是嵌入的，它没有路径，因为它存在于文件中.

我发现之前的一个问题已回答，但如果不弹出对话框就无法将此问题转到运行。

很可能还有另一种方法可以做到这一点，但在 Word 中有类似的问题，我使用以下步骤解决了它：-

Select 并复制对象
创建新文档（工作簿）
将对象粘贴到
将新文档（工作簿）另存为HTML
查看保存的包中唯一的图像文件（因为它是文件中唯一的东西）
将它移到某个位置，以便我可以在其他地方使用它
删除新文档（工作簿）及其 HTML 副本

Answer 2

似乎除了使用临时文件没有其他方法，我在这里 (click) 得到了解决方法代码的答案，再次感谢！

Excel OLE Objects 嵌入路径位置

Excel OLE Objects Embedded Path Location

excel

vba

ole