VBA instead of Hyperlinks

[Derrick]

Due to size limitations when storing hyperlinks how do I use the following
code to create multiple modules as configurable action buttons to use within
a presentation to link from on slide to the next. I am unable to use
Hyperlinks due to multiple failures and approx: 200 links within presentation
keep resetting and pointing to invalid locations. I found the following
information that will point to a http site, but I need the module once I
customize it to point to a particular slide (example - I click on a picture
and I want it to go to slide 8)

Option Explicit

Sub Fission(oBoom As Shape)
Dim vSaved As Boolean
vSaved = ActivePresentation.Saved

On Error Resume Next

With oBoom.ActionSettings(ppMouseClick)
.Hyperlink.Address = "http://" & _
oBoom.TextFrame.TextRange.Text
.Hyperlink.Follow
.Hyperlink.Delete
.Run = "Fission"
.Action = ppActionRunMacro
End With


ActivePresentation.Saved = vSaved

End Sub

 

[Derrick]

I'm not looking to link to another power point - I need to link to internal
slides within the same power point and Hyperlinks can not be used due to size
restrictions. Since I am not a VB coder how do I create the necessary VB to
jump from slide to slide based on the number I designate within the VB? If I
click a picture and within the picture the Action button is set up to go to
"slide 5" how do I code the VB to go to that slide when I select that macro
as an option for the action button.
The important thing to remember this power point is growing beyond belief
and using hyperlinkls is not an option due to how they are stored.

Thanks Steve

 

[Bill Dilworth]

Internal links take very, very little space. Even 200 should fit with
plenty of room to spare. And, the only way to make an internal link
invalid, is if you deleted the slide it was linked to.

Are you sure the internal links are the issue?

BTW, thank you for visiting my site.


--
Bill Dilworth
A proud member of the Microsoft PPT MVP Team
Users helping fellow users.
http://billdilworth.mvps.org
-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_
vestprog2@ Please read the PowerPoint FAQ pages.
yahoo. They answer most of our questions.
com www.pptfaq.com
..

 

[John Wilson]

As Bill says 200 links should easily stay below the limit. You might like to
read this though:
http://www.pptalchemy.co.uk/PPT_hyperlinks.html

 

[Derrick]

There are no issues other then Hyper links wont work anymore and any time I
save the file after making changes it re-arranges my hyper links in random
slides. I am aware of the issue with commas, etc and how they can mess up
your presentation. My issue is bigger then this and each month this
presentation grows bigger and bigger and I am constantly getting complaints
about links not going to where they are suppose to and when I recheck the
file after editing a new slide - the previous links are all rearranged. My
issue is two fold, 1. I have at least 3-5 hyperlinks per page and over 80
pages where some pages contain over 8 hyperlinks. Theses will continue to
grow each month as I phase from one stage to the next. 2. When I save this
presentation in either format - the linkage is destroyed and only remains in
contact if I work in 2003 and save as under a new name (this is time
consuming and takes two PC's to accomplish). I really need a way to bypass
the hyperlinks and make sure when I assign a button to go to slide 5 it is
going to slide 5. If you like I can send you the PPT in 2003 format and if
you mess with it - it will unlink and re-arrange the slides.
Thank you...

 

[John Wilson]

The above link talks about how to deal with the link storage method as well
as commas! Once the links are broken though there's no going back.

If you really want to use vba there's a method in the vba section
"'Hyperlinks' with vba"
http://www.pptalchemy.co.uk/powerpoint_hints_and_tips_tutorials.html#vba
--
Amazing PPT Hints, Tips and Tutorials

http://www.pptalchemy.co.uk/powerpoint_hints_and_tips_tutorials.html
_______________________________

 

[Derrick]

John - I read that information and used several items to try and fix the
issue and if I dont follow the steps I spoek on earlier using "Save As" and
only working with 2003 instead of 2007 my links rearrange themselves. The
presentation is not broken - but a nightmare to work in when trying to add
new data. The hyperlink part is so huge right now that I have no options but
to try and figure out VB. My problem is no one makes it clear enough in
regards to advancing slides. Even the link you posted talks about how to
change shapes in a new slide. i just want to click a shape, image, or action
button and go to a predetermined slide, then click another button and go to
another slide. Each button drills down on a particular topic or data and the
further the project grows the more data is added pertaining to the SDLC cycle
we are in. if I am in the elaboration phase CMMI and I now can begin DEV/QA
I need to jump around alot so Senior VP can check on the status of a project
rather then looking at MS Project. I created this power point to give them a
heads up on where the project is. I really need help in figuring out the
code - I suck at VBA but I do know enough to set up modules and link them to
action buttons, but not enough to create the VB to go to a particular slide.

I will keep messing with the storage issue - but would like to be able to
look into the VB side of things

 

[Derrick]

I'll play around with the hyperlink vba and see if I can get it to work