Utilisation d'AppleScript pour convertir par lots des pages .en pdf

J'ai besoin de convertir environ 100 documents .pages en pdf ou docx. Avec l'AppleScript script ci-dessous, je suis en mesure d'ouvrir les documents .pages à partir du dossier que je sélectionne. Cependant, je reçois l'erreur suivante lorsque j'essaie d'exporter.

Question : Quelle est la cause de l'erreur et comment la corriger ?

Message d'erreur avec remplacement des informations personnelles :

erreur "Une erreur s'est produite dans les pages : [ ] HD:Users:Path:To:File:foo.pages\" en un document de document" numéro -1700 de l'alias "Macintosh HD:Users:Path:To:File:foo.pages HD:Users:Path:To:File:foo.pages." en document

Ligne de code produisant l'erreur :

export this_file to exportFileName as PDF

script :

set exportFileExtension to "pdf"
set this_folder to (choose folder with prompt "Pick the folder containing the files to process:") as string
tell application "System Events"
    set these_files to every file of folder this_folder
end tell
repeat with i from 1 to the count of these_files
    set this_file to (item i of these_files as alias)
    set this_info to info for this_file
    tell application "Finder"
        set {fType, nExt} to ({file type, name extension} of file this_file)
        set documentName to the name of this_file
        set exportFileName to documentName & "." & exportFileExtension
    end tell
    if nExt contains "pages" then
        tell application "Pages"
            open this_file
            export this_file to exportFileName as PDF
            close saving no
        end tell
    end if
end repeat

###Update### : J'ai ajout de ce script sur github dans l'espoir qu'il profite à d'autres au fur et à mesure de son amélioration. Les contributions sont appréciées.