Як вставити документ до кінця документа Word замість початку?


2

Я нарешті з'ясував, як вставити документ Word в інший документ Word за допомогою AppleScript, але код нижче додає його на початку документа замість кінця (якщо, звичайно, припускати, що в приймальному документі є текст почати з).

on AddAttachmentFileToWordDoc(FilePath)
    tell application "Microsoft Word"
        set ContTemp to content of text object
        set StartRange to (count of ContTemp) - 1
        set endrange to StartRange
        set theRange to create range start StartRange end endrange
        tell theRange
            insert file at end file name (FilePath as text)
        end tell
    end tell
end AddAttachmentFileToWordDoc

Хто-небудь, будь ласка, скажіть мені, як додати документ замість цього в кінці? Що я роблю неправильно?

Відповіді:


3

Використовуйте end of contentвластивість отримати кінцеве положення текстового об'єкта.

Ось сценарій, протестований на версії Microsoft Word 16.13

set FilePath to choose file
my AddAttachmentFileToWordDoc(FilePath)

on AddAttachmentFileToWordDoc(FilePath)
    set f to FilePath as text
    tell application "Microsoft Word"
        set StartRange to (end of content of text object of active document) - 1
        set theRange to create range (active document) start StartRange end StartRange
        insert file at after theRange file name f with confirm conversions
    end tell
end AddAttachmentFileToWordDoc

Альтернативу діапазону ви можете використовувати after last character of active document, як це

on AddAttachmentFileToWordDoc(FilePath)
    set f to FilePath as text
    tell application "Microsoft Word"
        insert file at (after last character of active document) file name f with confirm conversions
    end tell
end AddAttachmentFileToWordDoc

Перший спосіб отримати діапазон додав його знову, на початок документа (але для графічного файлу він додає його до кінця). Другий метод породив цю помилку: "Microsoft Word отримав помилку: текстовий діапазон id" дані iWrgBB1C0000BB1C0000 "активного документа не розуміє повідомлення" вставити файл "."
МБУСТ
Використовуючи наш веб-сайт, ви визнаєте, що прочитали та зрозуміли наші Політику щодо файлів cookie та Політику конфіденційності.
Licensed under cc by-sa 3.0 with attribution required.