Bookmarks in Header und Footer ersetzen

  • VB.NET
  • .NET 4.0

Es gibt 4 Antworten in diesem Thema. Der letzte Beitrag () ist von gnuy.

    Bookmarks in Header und Footer ersetzen

    Ich suche nach einer Methode,
    um auch die Bookmarks, die im Dokumentenkopf oder Fuss existieren, zu ermitteln.

    Diese Routine :

    VB.NET-Quellcode

    1. Dim objWord As WordprocessingDocument = WordprocessingDocument.Open(destFile, True)
    2. Dim objMainDoc As OpenXmlElement = objWord.MainDocumentPart.Document()
    3. Dim bookmarkMap As IDictionary(Of String, BookmarkStart) = New Dictionary(Of String, BookmarkStart)()
    4. For Each bookmarkStart As BookmarkStart In objMainDoc.Descendants(Of BookmarkStart)()
    5. bookmarkMap(bookmarkStart.Name) = bookmarkStart
    6. Next
    7. For Each bookmarkStart As BookmarkStart In bookmarkMap.Values....



    liefert nur die Bookmarks im Dokument.
    Gut. Dann liegt's immerhin nicht an mir!

    Dieser Beitrag wurde bereits 2 mal editiert, zuletzt von „gnuy“ ()

    Hallo und Willkommen

    Bin nicht der VBA Profi aber da noch niemand gantwortet hat versuche ich mal mein Glück.

    Erstmal: Setze bitte code immer in CodaTags. So kann man ihn besser lesen.

    Zu deinem Problem. Du kannst ja nur die Bookmarks im Dokument finden wenn du nur dort suchst: objWord.MainDocumentPart.Document()

    Probier mal im Header zu suchen: objWord.Sections(1).Headers

    Grüße
    Sascha
    If _work = worktype.hard Then Me.Drink(Coffee)
    Seht euch auch meine Tutorialreihe <WPF Lernen/> an oder abonniert meinen YouTube Kanal.
    *unnötiges Zitat entfernt*

    Hallo Sascha,
    danke für den Hinweis. Leider gibt es diese property nicht

    VB.NET-Quellcode

    1. Private _oWord As WordprocessingDocument
    2. _oWord = WordprocessingDocument.Open(WordFileName, True)

    Gut. Dann liegt's immerhin nicht an mir!

    Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von „Marcus Gräfe“ ()