向?qū)?

Word 2010 Bible 上說有的模板，在基于它新建文件時，可以彈出一個新建向?qū)АＨ缓螅揖吞貏e地想實現(xiàn)這個功能，比如新建若干個節(jié)，新建目錄等。

跑到 http://word.mvps.org 上搜索了下，果然有方法，簡單的說就是 在模板工程的ThisDocument中，新建一個Document_New()過程，并實現(xiàn)之。復(fù)雜地說就是：

1. 雙擊 ThisDocument
   
2. 在右邊打開的編輯區(qū)上方有兩個組合框，選擇左邊那個框中的 Document，你會發(fā)現(xiàn)Word自動新建一個Document_New過程
3. 添加自定義Form，做成向?qū)Ъ纯?

頁面設(shè)置

向?qū)ё鐾暌院螅话銇碚f需要進行頁面設(shè)置。我看了半天幫助文件，了解了Section.PageSetup的各成員，好不容易才搞定，后來發(fā)現(xiàn)只需要找個空文件，按頁面設(shè)置要求，錄制一個宏，然后拷貝一下即可。

值得說明的是： 頁面設(shè)置最后一頁里，網(wǎng)格的每頁的行數(shù)和跨度，在VBA中只能設(shè)置LinesPage，Word會根據(jù)這個值計算跨度=(PageHeight-TopMargin-BottomMargin)/LinesPage，用戶可以在頁面設(shè)置中修改跨度，并且Word也會作出響應(yīng)（即一頁可以不剛好是整數(shù)行），但是VBA做不到這一點，很讓人崩潰~~

頁眉和頁腳

頁眉和頁腳由Section.Headers和Section.Footers來設(shè)置，

1. wdHeaderFooterPrimary：奇數(shù)頁
2. wdHeaderFooterEvenPages：偶數(shù)頁
3. wdHeaderFooterFirstPage：首頁
   

頁腳中可以添加頁碼，頁碼用域 {Page} 來表示，要控制頁碼的樣式或者重新編號，就需要用到

• Section.Footers.PageNumbers.RestartNumberingAtSection：是否在這節(jié)重新開始編號
• Section.Footers.PageNumbers.StartingNumber：編號開始
• Section.Footers.PageNumbers.NumberStyle：編號樣式
  

注意 ：不需要Section.Footers.PageNumbers.Add 方法來添加頁碼，直接在 Footers(index).Range中添加Page域即可

注意 ：從第2節(jié)開始中需要設(shè)置頁眉頁腳的 LinkToPrevious 屬性，并且在設(shè)置 Range屬性時，需要先調(diào)用 Range.Delete，不然會有上一節(jié)的頁眉頁腳內(nèi)容

添加目錄與目錄更新

添加目錄和更新目錄比較特殊，直接插入和更新TOC域貌似不太好使。

添加目錄 ：ActiveDocument.TablesOfContents.Add

更新目錄 ：ActiveDocument.TablesOfContents(1).Update