vba - 确定视频是否已链接 vba

Question

我正在尝试查看视频是否已链接或未使用 VBA。问题是当视频链接时 Shape.MediaFormat 不存在并且当它没有链接时 Shape.MediaFormat 存在但 LinkFormat.SourceFullName 不存在。

因此，如果我检查 MediaFormat 每次链接视频时都会出错，如果我尝试使用 LinkFormat.SourceFullName 每次未链接时都会出错。

我需要一些东西来检查这些属性是否存在而不给出错误。

score 0 · Accepted Answer

我在此处发布的针对您的另一个问题的例程（今天已更正）将使您获得更多代码行。

它告诉您媒体对象是否被嵌入。如果它是嵌入的，就不会有 LinkFormat，所以不要尝试访问它。如果它没有嵌入，那么它是链接的；您可以访问 LinkFormat

score 0 · Accepted Answer

使用前检查哪个是“无”。

if Shape.MediaFormat IsNot Nothing


end if

if Shape.SourceFullName IsNot Nothing


end if

2 回答 2