OpenXML Выделенный текст из документа слова с C#

Question

я использовал следующие, но он не будет работать

Dim htext= wordDocument.MainDocumentPart 
         .Document 
         .Descendants(Of Highlight)() 
         .Where(Function(h) h.Val = "yellow") 
         .ToList() 

Answer 1

Используйте этот метод, чтобы получить список выделенного текста.

Private Function GetListOfHighlightedString(ByVal Docx As WordprocessingDocument) As List(Of String) 
       Dim lstOfHighlightedString As List(Of String) = New List(Of String)() 
       Try 
        For Each EachRun In Docx.MainDocumentPart.Document.Body.Descendants(Of Run)() 
         If EachRun.RunProperties IsNot Nothing Then 
          For Each EachPrpChild In EachRun.RunProperties.ChildElements 
           If TypeOf EachPrpChild Is Highlight Then 
            Dim highlightVal As Highlight = TryCast(EachPrpChild, Highlight) 
            If highlightVal.Val.Equals(HighlightColorValues.Yellow) Then 
             lstOfHighlightedString.Add(EachRun.InnerText) 
            End If 
           End If 
          Next EachPrpChild 
         End If 
        Next EachRun 
       Catch e1 As Exception 

        Throw 
       End Try 
       Return lstOfHighlightedString