copy shapes from Excel to Powerpoint and preserve hyperlinks and tooltips

  • I have created a macro in Excel that add tooltips to shapes (the shapes are areas on a map):

    Sub labelshapes()
        Dim cll As Range
        Dim val As String
        For Each cll In ActiveSheet.Range("Y30:Y375")
          val = cll.Offset(0, 2)
        ActiveSheet.Hyperlinks.Add Anchor:=ActiveSheet.Shapes("Freeform: Shape " + cll), Address:="", ScreenTip:=val
        Next cll
    End Sub

    I want to be able to transfer the map into powerpoint for a presentation, but when I do the hyperlinks and tooltips are lost.

    Is there a way to do this and retain the tooltips, or alternatively recreate them in powerpoint? (I also noticed that powerpoint gives the shapes new Freeform numbers as well.)

    Many thanks


  • Hi,

    Never had to deal with this issue ...

    But you could probably run a loop dedicated to your hyperlinks and your tooltips ...

    If you feel like saying "Thank You" for the help received, do not hesitate to click the "Smiley" icon, below, in the bottom right corner :)

Participate now!

Don’t have an account yet? Register yourself now and be a part of our community!