如何将超链接添加到使用Interop幻灯片

Question

如何使用c＃将超链接添加到具体幻灯片演示文稿中？ 现在我已经找到了如何超链接到一个网站：

TextRange.ActionSettings [Microsoft.Office.Interop.PowerPoint.PpMouseActivation.ppMouseClick] .Hyperlink.Address = “http://www.google.com”;

，发现选项为最后/第一/下一个

TextFrame.TextRange.ActionSettings [PpMouseActivation.ppMouseClick] .Action = PpActionType.ppActionFirstSlide;

但不slide4

Answer 1

如果您在PowerPoint中手动添加设置，然后问它的设置是什么，它会告诉你的。例如，将链接添加到幻灯片4到文本框中，确保选中文本框，并运行此：

Sub Thing() 
    Dim oSh As Shape 
    Set oSh = ActiveWindow.Selection.ShapeRange(1) 
    With oSh 
     Debug.Print .ActionSettings(1).Hyperlink.Address 
     Debug.Print .ActionSettings(1).Hyperlink.SubAddress 
    End With 
End Sub 

结果，一个空行（没有超链接地址）和子地址​​：

259,4,Title of slide 4 

259是SlideID 4是SlideIndex “滑体4的标题”是在幻灯片的标题文字4

我相当肯定的ID和索引是必要的;标题不是。例如，要设置一个链接在同一呈现下滑3：

Sub ThingTwo() 
    Dim oSh As Shape 
    Set oSh = ActiveWindow.Selection.ShapeRange(1) 
    With oSh 
     .ActionSettings(1).Hyperlink.Address = "" 
     .ActionSettings(1).Hyperlink.SubAddress = "258,3," 
    End With 
End Sub 

在C＃中做它...作为练习留给读者。