Bonjour,

en exécutant le code suivant,

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
    Private Function Substitution(ByVal HashTableBookmark As Hashtable) As Stream
        Dim StreamDocumentOpenXML As Stream
        Dim MS As New MemoryStream
 
        StreamDocumentOpenXML = Stream.Null
 
            Using wordDocument As WordprocessingDocument = WordprocessingDocument.Create(MS, WordprocessingDocumentType.Document)
                Dim mainPart As MainDocumentPart = wordDocument.AddMainDocumentPart()
                mainPart.Document = New Document(New Body(New Paragraph(New Run(New Text("Hello")))))
                StreamDocumentOpenXML = mainPart.GetStream()
            End Using
 
 
        Return StreamDocumentOpenXML
    End Function
j'ai l'erreur suivante concernant le document Open Xml:
la référence d'objet n'est pas définie à une instance d'un objet
Est-ce que quelqu'un peut m'aider, svp ?