İster inanın ister inanmayın, bu kusur benim günlük işimde benim için 1 numaralı zaman kaybıdır. Varsayılan dışa aktarma klasörünün kaynak dosyayla aynı klasör olmasını sağlamak için, AppleScripts hazırlayıp Automator kullanarak hizmetlere katıştırdım. Bunu Sayfalarda pdf ve Word dışa aktarma, Sayılarda pdf ve Excel ve Keynote'ta pdf, PowerPoint ve png için yaptım.
Aşağıdaki kodu ekleme - her biri için, Automator'da yeni bir "Hızlı İşlem" (hizmet) oluşturmanız, bir "AppleScript Çalıştır" adımı eklemeniz, hiçbir girdi almayacak şekilde ayarlamanız ve belirli bir uygulamada çalışacak şekilde ayarlamanız gerekir. senaryo. Bir uygulama hizmetine özel yapılmış olsa bile, her hizmeti farklı bir adla kaydetmeniz gerekir (örn. "Sayfaları pdf'ye dışa aktar", "PowerPoint'e Keynote Dışa Aktar" vb.). İsteğe bağlı son adım olarak her uygulamada onlara klavye kısayolları atadım (Sistem Tercihleri → Klavye → ...). Bunu yaparsanız, hizmet kısayolları görünüşte çoğaltılamayacağından, muhtemelen hizmet düzeyinde değil uygulama düzeyinde kısayollar atamanız gerektiğini unutmayın.
Feragat, Applescript'te tam olarak şaşırtıcı değilim, bu yüzden bunlar mükemmel olmayabilir - ama benim için yeterince iyi görünüyorlar.
Varsayılan Klasör X güzel bir yazılım gibi görünüyor, ancak bu bir kusuru düzeltmekten çok daha fazlasını yapıyor, bu yüzden biraz abartılı. Geri kalanını istemiyorsanız, bunu devre dışı bırakamazsınız, ancak yine de bu sorunu çözmesini sağlayabilirsiniz.
Apple bunu düzgün bir şekilde düzeltmelidir.
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