Hyperlinks and Kiosk Mode

  • Thread starter Thread starter kimkom
  • Start date Start date
K

kimkom

Hi,

Hope you can help... this is concerns a problem I'm having with the 'Set Up
Show' options.

Is there a way to link from a PPT created in 'Presented by a speaker' mode
to one created with 'Browse at a kiosk' mode and retain the restricted kiosk
mode navigation?

Currently I have several PPTs created in kiosk mode which work as expected
when launched individually. However, if launched from a hyperlink in another
PPT all kiosk mode features are lost and the user can navigate via keyboard
and right mouse click.

I need to keep the main hyperlinking PPT in 'Presented by speaker' mode due
to it linking to lots of other files that allow navigation via keyboard and
mouse clicks.

Thanks in advance
 
Unfortunately, what you are experiencing is the way that it works. When you
start a presentation, it honors the setting (e.g. Kiosk mode). When you link
to a presentation from an other presentation, it ignores the setting in the
linked presentation and follows the setting of the presentation that started
the chain of links. It can be quite annoying at times. I don't know of any
way around this.
--David

Hi,

Hope you can help... this is concerns a problem I'm having with the 'Set Up
Show' options.

Is there a way to link from a PPT created in 'Presented by a speaker' mode
to one created with 'Browse at a kiosk' mode and retain the restricted kiosk
mode navigation?

Currently I have several PPTs created in kiosk mode which work as expected
when launched individually. However, if launched from a hyperlink in another
PPT all kiosk mode features are lost and the user can navigate via keyboard
and right mouse click.

I need to keep the main hyperlinking PPT in 'Presented by speaker' mode due
to it linking to lots of other files that allow navigation via keyboard and
mouse clicks.

Thanks in advance
Click to expand...

--
David M. Marcovitz
Author of _Powerful PowerPoint for Educators_
http://www.PowerfulPowerPoint.com/
Microsoft PowerPoint MVP
Associate Professor, Loyola University Maryland
 
Thanks for the replies, extremely informative!

I have another look tomorrow when I get a chance.

Steve,

You'll have gathered that converting all the presentations to Kiosk mode
isn't really an option - too late in development.

Are you saying to create a macro for each link starting something like:
Sub Launch_File1
and
Sub Launch_File2
etc

and having the path to each file within each routine?

Many thanks
 
Steve,

Thanks very much for taking the time to reply. Your advice has been
extremely helpful, I will give it a try when I get some free time from the
various other projects I've got on the go at the moment! I'll post how I get
on.

Thanks again,
Mike
 
John,

Thanks for the advice, nice trick that. Unfortuately most of the PPTs
involved contain macros I'm using, so I don't believe using the Viewer is an
option.

Regards,
Mike
 
Steve,

Thanks! That seems to work except for another issue I'm now having.

Below is the routine I'm using which you graciously provided:

Sub LaunchInKioskMode(oSh As Shape)
Dim oPres As Presentation
Dim sPresName As String

sPresName = oSh.AlternativeText
If Len(sPresName) > 0 Then
Set oPres = Presentations.Open(sPresName, _
True, , False)
End If

With oPres.SlideShowSettings
.ShowType = ppShowTypeKiosk ' or ppShowTypeSpeaker etc
.LoopUntilStopped = msoFalse
.ShowWithNarration = msoTrue
.ShowWithAnimation = msoTrue
.RangeType = ppShowAll
.AdvanceMode = ppSlideShowUseSlideTimings
.PointerColor.RGB = RGB(Red:=255, Green:=0, Blue:=0)
.Run
End With

End Sub



The problem is that when using this routine to link to another PPT, I no
longer get the 'Enable/Disable Macros?' dialog when the linked PPT is
launched. It looks like the macros ARE enabled in the linked file (which is
fine).

However, the routine below (which is contained within the linked file and
tests to see if the linked PPT is in 'Read Only' mode or not) now just throws
up that it currently IS in 'Read Only' mode even when it's not.


End SubSub ReadOnlyTest()

If ActivePresentation.ReadOnly = msoTrue Then
ActivePresentation.SlideShowWindow.View.GotoSlide 2
Exit Sub
Else
ActivePresentation.SlideShowWindow.View.GotoSlide 3
End If

End Sub



I'm not sure if this is down to my poor coding or the fact that the macros
are not working correctly.

Any ideas?

Many thanks,
Mike
 
Sorry, typo on my cut and pasted code. Should have read:

Sub ReadOnlyTest()

If ActivePresentation.ReadOnly = msoTrue Then
ActivePresentation.SlideShowWindow.View.GotoSlide 2
Exit Sub
Else
ActivePresentation.SlideShowWindow.View.GotoSlide 3
End If

End Sub



Mike
 
Ah, I understand what the problem is now. The 'Read only' state is being set
with the line:

Set oPres = Presentations.Open(sPresName, True, , False)

Where 'True' is setting the file to open as 'Read only'

Trying to resolve this now by setting to msoMixed (?)


Mike
 
Steve,

Sorry for my ramblings, but I think I've fixed the issue now. Just changed
your code to read:

Set oPres = Presentations.Open(sPresName, , False, False)

In effect not specifying whether it's read-only or not.

Thanks a lot, your code worked a treat. I just had to adapt to my specific
project.

I just hope I've got the syntax right now! :)

Thanks,
Mike
 
Back
Top