通过 VBA 从 Powerpoint 打开特定的 Excel 工作表答案

【问题标题】：Open Particular Excel Worksheet from Powerpoint via VBA通过 VBA 从 Powerpoint 打开特定的 Excel 工作表
【发布时间】：2017-06-15 22:04:58
【问题描述】：

我有一个 Power Point 演示文稿，其中包含使用 VBA 从 Excel 粘贴到其中的数据。 excel 文件中的数据是一个表格，其中包含指向同一工作簿中其他工作表的超链接。创建此示例的 VBA 是：

'为每个工作表添加超链接，用户可以使用它从 powerpoint 中查找

Range("B2").Select

ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:="", SubAddress:= _
    "'Title Missing'!A1", TextToDisplay:="Missing Title Tags"

这段代码工作得很好 - 然后宏将该表格粘贴到 Powerpoint 中。我的问题是它通过 powerpoint 文件寻找的文件是错误的，它正在寻找一个名为

的文件

C:\Users\Colin\Desktop\Title Missing.xlsx`

。 “Title Missing”是工作表的名称，此路径是通过 VBA 生成的路径，尽管在单击 VBA 创建的链接时从一个工作表跳到另一个工作表时路径从 Excel 内部正常工作。

如何获取指向正确工作表的链接以在 PowerPoint 中工作？

【问题讨论】：

标签： vba excel powerpoint

【解决方案1】：

使用地址参数：

ActiveSheet.Hyperlinks.Add Anchor:=Selection, _
   Address:=ActiveSheet.Parent.FullName, _
   SubAddress:="'Title Missing'!A1", TextToDisplay:="Missing Title Tags"

【讨论】：