PowerPoint VBA教程:TextToDisplay属性

返回或设置那些与图形无关的超链接的显示文字。可读写。String 类型。

说明

如果对那些与文字区域无关的超链接使用本属性,则会产生运行时错误。可以使用类似以下示例的代码,检测由myHyperlink 指定的超链接是否与某个文字范围相关联。


If TypeName(myHyperlink.Parent.Parent) = "TextRange" Then
    strTRtest = "True"
End If

VBA示例

本示例创建一个与第一张幻灯片第二个形状内的文字相关联的超链接。然后将显示文字设置为“Microsoft Home Page”,并将超链接地址设置为相应的 URL。


With ActivePresentation.Slides(1).Shapes(2) _
        .TextFrame.TextRange
    With .ActionSettings(ppMouseClick)
        .Action = ppActionHyperlink
        .Hyperlink.TextToDisplay = "Microsoft Home Page"
        .Hyperlink.Address = "http://www.microsoft.com/"
    End With
End With

上页:PowerPoint VBA教程:TextStyles属性 下页:PowerPoint VBA教程:TextUnitEffect属性

PowerPoint VBA教程:TextToDisplay属性

PowerPoint VBA教程:TextUnitEffect属性 PowerPoint VBA教程:TextureName属性
PowerPoint VBA教程:TextureType属性 PowerPoint VBA教程:ThreeD属性
PowerPoint VBA教程:Time属性 PowerPoint VBA教程:TimeLine属性
PowerPoint VBA教程:Timing属性 PowerPoint VBA教程:TintAndShade属性
PowerPoint VBA教程:Title属性 PowerPoint VBA教程:TitleMaster属性
PowerPoint VBA教程:To属性 PowerPoint VBA教程:Top属性
PowerPoint VBA教程:ToX属性 PowerPoint VBA教程:ToY属性
PowerPoint VBA教程:Tracking属性 PowerPoint VBA教程:Transparency属性
PowerPoint VBA教程:TransparencyColor属性 PowerPoint VBA教程:TransparentBackground属性
PowerPoint VBA教程:TriggerDelayTime属性 PowerPoint VBA教程:TriggerShape属性
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号