Function Repository Resource:

OpenSlideSorter

Source Notebook

Create a drag-and-drop interface for organizing presentation notebooks

Contributed by: Jon McLoone

ResourceFunction["OpenSlideSorter"][]

creates a drag-and-drop interface for organizing slides in the currently selected presentation notebook.

ResourceFunction["OpenSlideSorter"][nb]

creates a slide sorter interface for presentation notebook nb.

Details

nb should be a NotebookObject representing a Presenter Notebook.

Examples

Basic Examples

Create a simple presenter notebook:

In[1]:=
nb = NotebookPut[Notebook[{
    Cell["", "SlideShowNavigationBar", "FirstSlide", CellTags -> "SlideShowHeader"], Cell["Presentation title", "Title"],
    Cell["Presentation Subtitle", "Subtitle"], Cell["", "SlideShowNavigationBar", CellTags -> "SlideShowHeader"],
     Cell["First page", "Section"],
    Cell["OpenSlideSorter is great", "Epigraph"]
    },
   ScreenStyleEnvironment -> "Slideshow Working", StyleDefinitions -> FrontEnd`FileName[{"PresenterTools"}, "Default.nb"], "Theme" -> "Default"]]
Out[1]=
In[2]:=
ResourceFunction["OpenSlideSorter"][nb]
Out[2]=

Creates the following user interface:

Which allows you to drag-and-drop the slides into a new order:

When you are happy with the order, click "Apply changes" to transform the presentation into the new order:

If you make changes to the original notebook, click "Refresh" to update the drag-and-drop view.

Publisher

Jon McLoone

Version History

  • 1.0.0 – 26 November 2025

Related Resources

License Information