Question

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

＆＃39;添加超链接到用户可以用来从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`

。＆＃34;标题缺失＆＃34;是工作表的名称，这个路径是通过VBA生成的路径，尽管当单击VBA创建的链接时，从一个工作表跳到另一个工作表时，Excel内部的路径正常工作。

如何从PowerPoint中获取正确工作表的链接？

Answer 1

使用地址参数：

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

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

1 个答案: