Microsoft Office Forums

Go Back   Microsoft Office Forums > >

 
 
Thread Tools Display Modes
Prev Previous Post   Next Post Next
  #1  
Old 02-02-2018, 11:56 AM
ksor ksor is offline PAGE and NUMPAGES fields in footer ?? Windows 10 PAGE and NUMPAGES fields in footer ?? Office 2016
Advanced Beginner
PAGE and NUMPAGES fields in footer ??
 
Join Date: Feb 2018
Location: Århus V, Denmark
Posts: 78
ksor is on a distinguished road
Default PAGE and NUMPAGES fields in footer ??

I made this short method to setup a header/footer in a word document:

Code:
Public Sub headerFooter(f As Form, bD As Word.Document)
    With bD.Sections(1)
        .Headers(wdHeaderFooterPrimary).Range.Text = "Alle registrerede data vedr. PersonId: " & f.PersonID & " " & HentFMENavn(f.PersonID)
        .Footers(wdHeaderFooterPrimary).Range.Text = "Sammensat " & StrConv(Format(Date, "dddd"), vbProperCase) & " den " & Date & vbTab & vbTab & "Side "
        .Footers(wdHeaderFooterPrimary).Range.Fields.add Selection.Range, wdFieldEmpty, "PAGE  ", True
        .Footers(wdHeaderFooterPrimary).Range.Text = " af "
        .Footers(wdHeaderFooterPrimary).Range.Fields.add Selection.Range, wdFieldEmpty, "NUMPAGES  ", True
    End With
End Sub
BUT the actual digits for the fields PAGE and NUMPAGES is NOT writen in the footer - they are writen in the normal text area !



What do I need to change in the code ?

EDIT: Now I see I should have posted in WORD VBA - sorry !
Reply With Quote
 



Similar Threads
Thread Thread Starter Forum Replies Last Post
I have 20 page word document with a footer. Can i change page # 10 footer only? aligahk06 Word 2 10-25-2017 04:53 AM
PAGE and NUMPAGES fields in footer ?? Showing "page of numpages" and "sectionpage of sectionpages" RobH Word 2 02-14-2016 04:12 PM
PAGE and NUMPAGES fields in footer ?? begin each section with page 1 in header PLUS continuous page numbering in footer onemorecupofcoffee Word 18 09-04-2013 04:31 PM
Need help with quickparts(fields) in footer Nighthawk Word 2 08-22-2012 05:13 AM
PAGE and NUMPAGES fields in footer ?? Use NUMPAGES in formulae Friedebarth Word 1 11-30-2011 02:22 PM

Other Forums: Access Forums

All times are GMT -7. The time now is 10:07 PM.


Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, vBulletin Solutions Inc.
Search Engine Optimisation provided by DragonByte SEO (Lite) - vBulletin Mods & Addons Copyright © 2025 DragonByte Technologies Ltd.
MSOfficeForums.com is not affiliated with Microsoft