-- Make Finder select the corresponding PNG of the current slide

-- get the slide number
tell application "Keynote"
	tell document 1
		set slideNumber to slide number of the current slide
	end tell
end tell

-- compose the path name
set slideFileName to text -3 thru -1 of ("000" & slideNumber)
set slideFilePath to POSIX path of (path to desktop) & "Keynote export/" & slideFileName & ".png"
log slideFilePath

-- select the path
tell application "Finder"
	select my (POSIX file slideFilePath)
end tell