Percaya atau tidak, cacat ini adalah pembuang waktu # 1 bagi saya dalam pekerjaan saya sehari-hari. Untuk mendapatkan folder ekspor default menjadi folder yang sama dengan file sumber, saya akhirnya membuat AppleScripts dan menanamkannya dalam layanan menggunakan Automator. Saya melakukan ini untuk pdf dan ekspor Word dalam Pages, pdf dan Excel in Numbers, dan pdf, PowerPoint, dan png di Keynote.
Melampirkan kode di bawah ini - untuk masing-masing, Anda perlu membuat "Tindakan Cepat" (layanan) baru di Automator, tambahkan langkah "Jalankan AppleScript", atur agar tidak menerima input, dan atur agar berfungsi di aplikasi khusus untuk naskah. Anda perlu menyimpan setiap layanan dengan nama yang berbeda (mis. "Ekspor Halaman ke pdf", "Ekspor Keynote ke PowerPoint", dll.) Karena bahkan ketika dibuat khusus untuk layanan aplikasi bersifat global. Sebagai langkah terakhir opsional saya menetapkan pintasan keyboard untuk mereka di setiap aplikasi (System Preferences → Keyboard → ...). Catatan jika Anda melakukan ini, Anda mungkin perlu menetapkan pintasan di tingkat aplikasi, bukan di tingkat layanan, karena pintasan layanan tampaknya tidak dapat diduplikasi.
Penafian Saya tidak benar-benar luar biasa di Applescript sehingga ini mungkin tidak sempurna - tetapi mereka tampaknya bekerja cukup baik untuk saya.
Default Folder X tampaknya seperti perangkat lunak yang bagus tetapi tidak lebih dari sekadar memperbaiki kekurangan yang satu ini, jadi agak berlebihan. Dan jika Anda tidak ingin sisa dari apa yang dilakukannya, Anda tidak dapat menonaktifkan itu tetapi tetap menyelesaikannya.
Apple harus memperbaikinya dengan benar.
tell application "Pages"
set exportFile to file of front document as text
set exportFile to text 1 thru -6 of exportFile
set exportFile to exportFile & "pdf"
export front document to file exportFile as PDF with properties {image quality:Best}
end tell
tell application "Finder"
activate
reveal exportFile
end tell
tell application "Pages"
set exportFile to file of front document as text
set exportFile to text 1 thru -6 of exportFile
set exportFile to exportFile & "docx"
export front document to file exportFile as Microsoft Word
end tell
tell application "Finder"
activate
reveal exportFile
end tell
tell application "Numbers"
set exportFile to file of front document as text
set exportFile to text 1 thru -8 of exportFile
set exportFile to exportFile & "pdf"
export front document to file exportFile as PDF with properties {image quality:Best}
end tell
tell application "Finder"
activate
reveal exportFile
end tell
tell application "Numbers"
set exportFile to file of front document as text
set exportFile to text 1 thru -8 of exportFile
set exportFile to exportFile & "xlsx"
export front document to file exportFile as Microsoft Excel
end tell
tell application "Finder"
activate
reveal exportFile
end tell
tell application "Keynote"
set exportFile to file of front document as text
set exportFile to text 1 thru -4 of exportFile
set exportFile to exportFile & "pdf"
export front document to file exportFile as PDF with properties {PDF image quality:Best}
end tell
tell application "Finder"
activate
reveal exportFile
end tell
tell application "Keynote"
set exportFile to file of front document as text
set exportFile to text 1 thru -4 of exportFile
set exportFile to exportFile & "pptx"
export front document to file exportFile as Microsoft PowerPoint
end tell
tell application "Finder"
activate
reveal exportFile
end tell
tell application "Keynote"
set exportFile to file of front document as text
set exportFile to text 1 thru -5 of exportFile
export front document to file exportFile as slide images with properties {image format:PNG}
end tell
tell application "Finder"
activate
reveal exportFile
end tell