Macro Based hyperlink for Contents page

[zakfalls]

Hi,

i have ben trying to set-up a contents page which will update automatiaclly
whenever a slide is added or removed.

the only i have found of doing this is using a macro linked to the
hyperlinks (unfortunately, i can't find the the post where i got this answer
from).

it works when you have slide number in the following format <xx> as a
hyperlink to the relavent slide and the macro updates the new position of the
slide when a slide is removed or added. the macro coding is as follows:

Sub contents ()

Dim ohl As Hyperlink
Dim newtxt As TextRange
Dim Ipos1 As Integer
Dim Ipos2 As Integer
Dim InewID As Integer
Dim InewIndex As Integer
For Each osld In ActivePresentation.Slides
For Each ohl In osld.Hyperlinks
If TypeName(ohl.Parent.Parent) = "TextRange" Then
InewID = Left$(ohl.SubAddress, 3)
InewIndex = ActivePresentation.Slides.FindBySlideID(CInt(InewID)).SlideIndex
Ipos1 = InStr(1, ohl.TextToDisplay, "<")
Ipos2 = InStr(1, ohl.TextToDisplay, ">")
If Ipos1 <> 0 And Ipos2 <> 0 Then
ohl.TextToDisplay = Left$(ohl.TextToDisplay, Ipos1 - 1) & _
"<" & CStr(InewIndex) & ">" & Right$ _
(ohl.TextToDisplay, Len(ohl.TextToDisplay) - Ipos2)
End If
End If
Next ohl
Next osld
Exit Sub
errhandler:
MsgBox "**ERROR**" & vbCrLf & "Error is " & Err.Description
End Sub

this works perfectly, however, if i send the presentation to someone else
with the same software, they are able to see the macro, but cannot click on
the "Run" button in Macro tool bar.

any ideas as to why this is happening and is there any way around it?

Thanks

 

[David M. Marcovitz]

What version of PowerPoint are you using and what version is the other
person using? Does the other person have macro security set so the macro
can run?
--David

 

[zakfalls]

Hi,

Everyone is using 2003 version, i initially thought it might be a security
problem, but i have changed the settings on their computer and set it at
low!!!.

Thanks

 

[David M. Marcovitz]

If everyone is in the 2003 version, you might want to ask your questions
in the Windows PowerPoint group (microsoft.public.powerpoint) as you
have landed in the Mac group. Did you change security settings while the
file was open? Macro security is read when the file is opened. If you
change security while the file is open, it will have no effect until you
close and re-open the file.
--David

 

[zakfalls]

Hi David,

thats brilliant, thanks, just tried changing the security settings without
having the file open, and it works.

thanks for your help, much appreciated.