如何在Excel VBA中获得嵌入式对象Titile？

Question

如何在excel vba中获取嵌入式对象Titile

enter code here

For Each cboTemp In Worksheets(sheetname).OLEObjects
Debug.Print cboTemp.Index, cboTemp.Name, cboTemp.Application.Caption, 
cboTemp.progID, cboTemp.FileName

如何获取嵌入式目标文件的文件名或标题（cboTemp.FileName）未定义错误属性

或cboTemp.SourceName 不起作用

注意：我的案例excel是文件

Answer 1

没有FileName属性。如果工作簿已嵌入，那么您将无法获得其文件名，因为它实际上没有文件名。如果已链接，则SourceName属性将包含链接的文件名（并且ProgID will给出错误）。