Paginanummers 1 van 2

[Tolax]

Hallo,

Ik kan maar niet vinden hoe ik het volgende krijg als pagina nummer:
"Pagina 1 van {totaal-aantal}"

De eerste vier pagina's hebben geen nummer en die moeten dan ook niet bij het totaal-aantal opgeteld worden.

Ik heb al de functie "NumPages" geprobeerd maar dan krijg ik een totaal van 12 pagina's terwijl het document maar uit 10 pagina's bestaat (incl. de vier zonder nummer).

Alvast bedankt!
Timo

(Word 2007 trouwens)

 

[flow10]

-Onderaan pagina 4 een <sectie-einde volgende pagina> invoegen
-Op pagina 5: paginanummer <opmaak paginanummer>
-<Beginnen bij 1>
-paginanummer b.v. <onderaan pagina>
-Scroll naar beneden en kies <vette nummers> of <vette getallen>

Zorg dat de voettekst onderaan pagina 5 niet gekoppeld is aan de vorige sectie.
Hoe je de 1e vier pagina niet bij het totaal laat optellen weet ik niet, wel kun je het getal na <van> handmatig aanpassen.

Succes!

 

[Tolax]

-Onderaan pagina 4 een <sectie-einde volgende pagina> invoegen
-Op pagina 5: paginanummer <opmaak paginanummer>
-<Beginnen bij 1>
-paginanummer b.v. <onderaan pagina>
-Scroll naar beneden en kies <vette nummers> of <vette getallen>

Zorg dat de voettekst onderaan pagina 5 niet gekoppeld is aan de vorige sectie.
Hoe je de 1e vier pagina niet bij het totaal laat optellen weet ik niet, wel kun je het getal na <van> handmatig aanpassen.

Succes!

Ja, tot zover was ik dus ook gekomen (A)
Maar ik ben dus eigenlijk op zoek naar het automatisch gegenereerde aantal pagina's :S

Via Voettekst bewerken > Opmaak > Snelonderdelen > Veld kun je "Numpages" invoegen of een formule, ik wil dus het aantal pagina's min zes, maar ik krijg errors omdat ik de formules niet correct invoer.

 

[snb]

{={numpages} -6}

hoe invoeren:

alt-F9
ctrl-F9
zet de cursor tussen de accolades
type =
ctrl-F9
zet de cursor tussen de accolades
typ numpages
ga met de cursor voor de laatste accolade staan
typ -6
alt-F9
selecteer veld
F9

of draai deze macro:

Sub tssss()
  With ActiveDocument.Fields
    .Add Selection.Range, wdFieldEmpty, "=  -6", False
    .Add ActiveDocument.Fields(1).Code.Characters(3), wdFieldEmpty, "numpages", False
    .Update
  End With
End Sub

 

[Tolax]

{={numpages} -6}

hoe invoeren:

alt-F9
ctrl-F9
zet de cursor tussen de accolades
type =
ctrl-F9
zet de cursor tussen de accolades
typ numpages
ga met de cursor voor de laatste accolade staan
typ -6
alt-F9
selecteer veld
F9

of draai deze macro:

Sub tssss()
  With ActiveDocument.Fields
    .Add Selection.Range, wdFieldEmpty, "=  -6", False
    .Add ActiveDocument.Fields(1).Code.Characters(3), wdFieldEmpty, "numpages", False
    .Update
  End With
End Sub

Gelukt! Dankjewel.