Apple Keynote: export presenter notes

keynote.scpt

-- HOWTO:
-- after saving it, open with Script Editor (default) and run it

-- PREREQUISITES:
-- make sure your Keynote presentation is open in the background 

-- AFTER EXPORT:
-- if you can't open the file due to encoding errors, open with Sublime (or another a text editor) and then "File / Save with encoding / UTF8"

tell application "Keynote"
	activate
	-- open (choose file)
	tell front document
		-- Get the name of the presentation.
		set thePresentationName to name
		
		-- Retrieve the titles of all slides.
		set theTitles to object text of default title item of every slide
		
		-- Retrieve the presenter notes for all slides.
		set theNotes to presenter notes of every slide
	end tell
end tell
set presenterNotes to ""
repeat with a from 1 to length of theTitles
	-- skip slides with empty notes
	if not (item a of theNotes) = "" then
		set presenterNotes to presenterNotes & "#### Slide " & a & ": " & item a of theTitles & return & return
		set presenterNotes to presenterNotes & "##### Presenter Notes: " & return & item a of theNotes & return & return
	end if
end repeat

set the clipboard to presenterNotes
do shell script "pbpaste > ~/Desktop/keynote-notes-" & quoted form of thePresentationName & ".md"

-- based on http://apple.stackexchange.com/questions/136118/how-to-print-full-presenter-notes-without-slides-in-keynote

Is there a way to exclude skipped slides?

Just add whose skipped is false at the end of the two lines that retrieve the titles and the presenter notes

set theTitles to object text of default title item of every slide whose skipped is false
set theNotes to presenter notes of every slide whose skipped is false

Or as seen in Script Editor

Thank you, so useful

Used it today with Keynote 14 and Ventura. Thanks again.