I am converting a print indesign file for use with dps. The problem is DPS wants individual files for each page. Is there a script to take each page and save as an indesign file?
G'day
You could start with something like this :
tell application "Adobe InDesign CS4"
set enable redraw of script preferences to false
activate
set dsDoc to active document
set dsDocProps to properties of document preferences of dsDoc
set pages per document of dsDocProps to 1
set dsFilePath to (full name of dsDoc) as text
set text item delimiters of AppleScript to "."
set dsFilePath to text 1 thru text item -2 of dsFilePath
set text item delimiters of AppleScript to ""
set dsPageCount to (count of pages of dsDoc)
repeat with w from dsPageCount to 1 by -1
set dsNewDoc to make new document with properties {document preferences:dsDocProps}
duplicate page w of dsDoc to after page 1 of dsNewDoc
set active document to dsNewDoc
delete page 1 of dsNewDoc
save dsNewDoc to (dsFilePath & "_" & w & ".indd")
close active document
delay 1
end repeat
close dsDoc saving no
end tell
m.
Message was edited by: myDwayneSmith
Sorry, just posted this before seeing the 5.5 thing — should still work if you update the version number in the first line.
You might need to change "set dsFilePath to (full name of dsDoc) as text" to "set dsFilePath to (full name of dsDoc) as string"
Already have an account? Login
Enter your E-mail address. We'll send you an e-mail with instructions to reset your password.
AdChoices