11
$\begingroup$

I'm doing a slideshow for an informative conference, so I need a slideshow running in background on some monitors.

My question is: is there any way to make Mathematica to cycle slides automatically? Manipulate, Animate and SlideView have the "Play" button by which one can set the speed. I'd need something similar for the slideshow.

Any idea is welcome, also those which require the editing of notebook code.

$\endgroup$
1
  • $\begingroup$ Related: 17394 $\endgroup$
    – Michael E2
    Sep 21, 2013 at 12:39

1 Answer 1

7
$\begingroup$

When I execute this code at the beginning of a slideshow, the cells are presented one after the other and the slides change automatically.

nb = EvaluationNotebook[]; n = 20; 
While[True, SelectionMove[nb, Before, Notebook]; 
  Do[SelectionMove[nb, Next, Cell]; SelectionMove[nb, After, Cell]; 
  Pause[1], {n}]]

You might want to change n, and either hide the evaluating cell manually or with code.

You do not have to put that code in your slide show. In fact, you can open the slide show with code from another notebook. In that case, you should change the first command to something like

nb = NotebookOpen[ToFileName[docpath, "document.nb"]];
$\endgroup$
3
  • $\begingroup$ Thank: it seems to work! Do you thin isn't there a method to perform it without the "selection move"? $\endgroup$
    – markus
    Sep 22, 2013 at 6:23
  • $\begingroup$ You might want to set an AutoHotkey macro that sends PageDown and Ctrl+Home keystrokes to Mathematica. $\endgroup$
    – Hector
    Sep 22, 2013 at 8:50
  • $\begingroup$ @Hector, that's Windows only. $\endgroup$ Jun 29, 2015 at 19:13

Your Answer

By clicking “Post Your Answer”, you agree to our terms of service and acknowledge you have read our privacy policy.

Not the answer you're looking for? Browse other questions tagged or ask your own question.