Ответ: Нужен скрипт, очень!
Дело не в том, что Ворд использует не юникод, а в том, что используются 7-битные фонты с символами греческого на местах английских. Правильная интерпретация этих фонтов в принципе невозможна в Индезайне.
Есть скрипт, предназначенный для перевода киррилицы в юникод (Апплскрипт), но у него особенность та, что обработке подвергаются все связанные фреймы, а мне нужно только выборку обрабатывать. Если кто сможет его подредактировать, меня вполне устроит!
tell application "InDesign CS"
tell document 1
set SelBoxes to selection
repeat with x in SelBoxes
set TextFrom to item 1 of text of parent story of x
--try
if class of x is text frame then ¬
if TextFrom is not "" then set text of parent story of x to my EncodeText(TextFrom)
--end try
end repeat
end tell
end tell
on EncodeText(Str)
set HexCodesStr to {"<0410>", "<0411>", "<0412>", "<0413>", "<0414>", "<0415>", "<0401>", "<0416>", "<0417>", "<0418>", "<0419>", "<041A>", "<041B>", "<041C>", "<041D>", "<041E>", "<041F>", "<0420>", "<0421>", "<0422>", "<0423>", "<0424>", "<0425>", "<0426>", "<0427>", "<0428>", "<0429>", "<042C>", "<042B>", "<042A>", "<042D>", "<042E>", "<042F>", "<0430>", "<0431>", "<0432>", "<0433>", "<0434>", "<0435>", "<0451>", "<0436>", "<0437>", "<0438>", "<0439>", "<043A>", "<043B>", "<043C>", "<043D>", "<043E>", "<043F>", "<0440>", "<0441>", "<0442>", "<0443>", "<0444>", "<0445>", "<0446>", "<0447>", "<0448>", "<0449>", "<044C>", "<044B>", "<044A>", "<044D>", "<044E>", "<044F>"}
set RusChars to "??????›??????????????????????????‡·‚„‰????????????????????????????"
set ResultString to Str
repeat with x from 1 to 66
if (character x of RusChars) is in ResultString then
set AppleScript's text item delimiters to {(character x of RusChars)}
set PartialStr to text items of ResultString
set AppleScript's text item delimiters to {item x of HexCodesStr}
set ResultString to PartialStr as string
end if
end repeat
set AppleScript's text item delimiters to {""}
return ResultString
end EncodeText
