Microsoft Word - Tirer dynamiquement dans le fichier HTML et l'ajouter - Possible?

Question

Est-ce que les documents Word ont des capacités de script pour présenter des informations dynamiques? Ce que je veux faire, c'est que le document récupère dynamiquement le contenu d'un fichier HTML et l'ajoute à la fin du document chaque fois qu'il est ouvert.

Quelqu'un sait si c'est possible?

Answer 1

Placez ce qui suit dans un module de code. La routine AutoOpen est exécutée chaque fois que le document est ouvert.

Public Sub AutoOpen() 
    Dim currentDocument As Document 
    Set currentDocument = ActiveDocument 

    Dim sourceDocument As Document 
    Set sourceDocument = Application.Documents.Open(FileName:="e:\mySourceName.docx") 
    sourceDocument.Range.Copy 
    sourceDocument.Close wdDoNotSaveChanges 
    Set sourceDocument = Nothing 

    Dim pasteRange As Range 
    Set pasteRange = currentDocument.Range 
    pasteRange.Collapse wdCollapseEnd 

    pasteRange.Paste 
End Sub