Frage : Ändernder Feldschlüssel der gegenwärtigen Überschrift

Liebe Experten:

With der Cursor, der in irgendeinem Abschnitt meines Dokuments liegt, möchte ich das folgende durchführen:

Access die UNGERADE Seite und die Überschrift DER GLEICHMÄSSIGEN Seite des Abschnitts, in dem der Cursor z.Z. innen liegt und ändern den Feldschlüssel {Hinweis bookmark_DE \ h} zu {Hinweis bookmark_EN \ h} using VBA.

I Hoffnung dieses ist durchführbar.

Thank Sie sehr viel im Voraus.

Regards, Andreas

Antwort : Ändernder Feldschlüssel der gegenwärtigen Überschrift

Hallo sehen Andreas, wenn dieser in allen Fällen arbeitet.
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:

VorModifyHeaderFields ()
    Schwache sek als Word.Section
    Schwaches rng als Word.Range
    Schwaches fld als Word.Field
    Schwaches h als Word.WdHeaderFooterIndex
    
    Rng = Selection.Range einstellen
    Sek = rng einstellen. Abschnitte (1)
    Für lassen h = wdHeaderFooterPrimary zu wdHeaderFooterEvenPages Schritt 2 'erste Seitenüberschrift aus
        Für jedes fld in der sek. Überschriften (h). Range.Fields
            fld. Code.Text = ersetzen (fld. Code.Text, „Hinweis bookmark_DE \ h“, „Hinweis bookmark_EN \ h“)
        Folgendes fld
    Folgendes h
Enden-Unterseeboot
Weitere Lösungen  
 
programming4us programming4us