Fråga : Att ändra sätter in kodifierar av strömtitelrad

Kära experter:

With som markören som bor i något, delar upp av mitt dokument, mig, skulle något liknande för att utföra efter:

Access den UDDA sidan och ÄVEN sidatitelraden av dela upp, var markören bor för närvarande in, och ändrar sätta in kodifierar {referens-bookmark_DE \ H} till {referens-bookmark_EN \ H} using VBA. hopp för

I detta är görligt.

Thank dig mycket i förskott.

Regards, Andreas
" klar "

Svar : Att ändra sätter in kodifierar av strömtitelrad

Hi Andreas, ser, om denna fungerar sammanlagt fall.
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
UnderModifyHeaderFields ()
    Dunkel sekund som Word.Section
    Dunkel rng som Word.Range
    Dunkel fld som Word.Field
    Dunkelt H som Word.WdHeaderFooterIndex
    
    Fastställd rng = Selection.Range
    Fastställd sekund = rng. Delar upp (1)
    För H = wdHeaderFooterPrimary till wdHeaderFooterEvenPages kliver 2 'utelämnar den första sidatitelraden
        För varje fld i sekund. Titelrader (H). Range.Fields
            fld. Code.Text = byter ut (fld. Code.Text-, ”referens-bookmark_DE \ H”, ”referens-bookmark_EN \ H”)
        Nästa fld
    Nästa H
Avsluta suben
Andra lösningar  
 
programming4us programming4us