![]() |
#9
|
|||
|
|||
![]()
Yes thanks to Graham gmayor !!!
' first footer ActiveDocument.AttachedTemplate.BuildingBlockEntri es("PDPVF1").Insert Where:=ActiveDocument.Sections(1).Footers(2).Range , RichText:=True ' second footer, even-numbered pages ActiveDocument.AttachedTemplate.BuildingBlockEntri es("PDPVF1").Insert Where:=ActiveDocument.Sections(1).Footers(3).Range , RichText:=True ' third footer, odd-numbered pages ActiveDocument.AttachedTemplate.BuildingBlockEntri es("PDPVF1").Insert Where:=ActiveDocument.Sections(1).Footers(1).Range , RichText:=True ' PDPVF1 is a buildingblock constructed by having selected the desired formatted text written before in the document, including whole the content of IF field : ' PDPVF1 ==> {IF {PAGE} = {NUMPAGES} "my formatted text"} ' OR ' PDPVF1 ==> {IF {PAGE} = {NUMPAGES} {AUTOTEXT YOURAUTOTEXTFORMATTED}} |
Thread Tools | |
Display Modes | |
|
![]() |
||||
Thread | Thread Starter | Forum | Replies | Last Post |
Distribute text in one cell across a range of cells (overcoming selection.range.cells.count bug) | slaycock | Word VBA | 0 | 02-18-2017 07:00 AM |
![]() |
PRA007 | Word VBA | 2 | 02-19-2016 12:52 AM |
![]() |
paik1002 | Word VBA | 1 | 12-17-2015 04:51 AM |
Selection or Range | Tommes93 | Word VBA | 1 | 04-10-2014 02:50 AM |