Come inserire il documento alla fine del documento Word anziché all'inizio?

Question

Come inserire il documento alla fine del documento Word anziché all'inizio?

#1 da (3 voti)

2

Finalmente ho capito come inserire un documento di Word in un altro documento di Word usando AppleScript, ma il codice qui sotto lo aggiunge all'inizio del documento anziché alla fine (presupponendo, ovviamente, che ci sia del testo nel documento ricevente per iniziare).

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

Qualcuno può dirmi come aggiungere il documento alla fine del documento? Cosa sto sbagliando?

ms-office applescript

posta MBUST 15.05.2018 - 20:34

fonte

1 risposta

Leggi altre domande sui tag ms-office applescript

Come posso bloccare lo schermo di MBP senza bloccare il portachiavi? Che cosa è successo al mio MacOS?

score 3 · Accepted Answer

Utilizza la proprietà end of content per ottenere la posizione finale dell'oggetto di testo.

Ecco lo script, testato su Microsoft Word versione 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

Un'alternativa a un intervallo, puoi usare after last character of active document , come questo

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