Results 1 to 4 of 4
  1. #1
    5 Star Lounger
    Join Date
    Aug 2001
    Location
    Surrey, United Kingdom
    Posts
    1,001
    Thanks
    0
    Thanked 0 Times in 0 Posts

    Hover Text effect (2003 XP2)

    Good afternoon

    I currently use the screen tip function when making certain presentations, this however has limitations as you cannot seem to be able to use 'enter', 'ctrl' or 'alt' to make more than one line so that you can format it how you want (Iwant to hover the mouse over worlwide locations to show addressess). Does anybody have any tips I can use that do not involve using an add in.

    For anybody wondering what I am talking about or if you don't know how to use the screntips in PowerPoint, you do the following (2000 or later)

    1. Type a word into your presentation
    2. Select it and right click
    3. from the list choose 'Hyperlink' and then choose 'Bookmark'
    4. From the list of slides select the slide where you have placed the text
    5. Click on the 'Screen Tip' button
    6. Do this with all text items that require a screen tip
    7. Now when you run your slide show (F5) and hover the mouse over the text the screen tip will show.

    Cheers

    Steve
    Cheers

    Steve

    Asking the questions everbody wants the answers too but feels too stupid to ask themselves :-)

  2. #2
    Plutonium Lounger
    Join Date
    Mar 2002
    Posts
    84,353
    Thanks
    0
    Thanked 29 Times in 29 Posts

    Re: Hover Text effect (2003 XP2)

    You can use VBA to do this, even without writing a complete macro:
    - Press Alt+F11 to activate the Visual Basic Editor.
    - Press Ctrl+G to activate the Immediate window.
    - Type the following:

    ActiveWindow.View.Slide.Hyperlinks(1).Screentip = "First line" & vbNewline & "Second line" & vbNewline & "Third line"

    - Press Enter.
    - Switch back to PowerPoint and run the slide show to test the screentip.

    If you have multiple screentips on a slide, use Hyperlinks(2), Hyperlinks(3) etc. You will have to experiment to see which index number you need.

  3. #3
    5 Star Lounger
    Join Date
    Aug 2001
    Location
    Surrey, United Kingdom
    Posts
    1,001
    Thanks
    0
    Thanked 0 Times in 0 Posts

    Re: Hover Text effect (2003 XP2)

    Thanks Hans

    I am off to try it

    Have a nice weekend

    Cheers

    Steve
    Cheers

    Steve

    Asking the questions everbody wants the answers too but feels too stupid to ask themselves :-)

  4. #4
    3 Star Lounger
    Join Date
    Feb 2007
    Location
    Durham, Durham, United Kingdom
    Posts
    286
    Thanks
    0
    Thanked 10 Times in 10 Posts

    Re: Hover Text effect (2003 XP2)

    Hi Steve

    As well as what Hans said here's some code which will do the whole thing for you (insert the blank hyperlink and multi line tips!)

    Select a shape or text and run. Type in the tip with forward slashes indicating where new lines start eg My first Line/Line two

    Sub screeny()
    Dim IsID As Integer
    Dim strScreenTip As String
    Dim splitme() As String
    Dim i As Integer
    Err.Clear
    On Error GoTo errhandler
    IsID = ActiveWindow.Selection.SlideRange(1).SlideID
    strScreenTip = InputBox("Type in the tip with '/'indicating line breaks")
    splitme = Split(strScreenTip, "/")
    On Error Resume Next
    With ActiveWindow.Selection.TextRange.ActionSettings(pp MouseClick)
    .Action = ppActionHyperlink
    .Hyperlink.SubAddress = IsID & ",,"
    For i = 0 To UBound(splitme)
    .Hyperlink.ScreenTip = .Hyperlink.ScreenTip & splitme(i) & vbCrLf
    Next
    End With
    If Err.Number <> 0 Then
    With ActiveWindow.Selection.ShapeRange(1).ActionSetting s(ppMouseClick)
    .Action = ppActionHyperlink
    .Hyperlink.SubAddress = IsID & ",,"
    For i = 0 To UBound(splitme)
    .Hyperlink.ScreenTip = .Hyperlink.ScreenTip & splitme(i) & vbCrLf
    Next
    End With
    End If
    Exit Sub
    errhandler:
    MsgBox "Is something selected?"
    End Sub

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •