如何用vb替換word中的頁腳

可以先在word中錄制壹個VB代碼宏，主要是修改頁腳以供參考:

子宏1()

'

Macro1宏

宏是微軟用戶在2008年5月23日錄制的。

'

如果ActiveWindow。View . SplitSpecial & lt& gt那就wdPaneNone

活動窗口。窗格(2)。關閉

如果…就會結束

如果ActiveWindow。active pane . view . type = wdNormalView或ActiveWindow。_

ActivePane。View.Type = wdOutlineView然後

活動窗口。active pane . view . type = wdPrintView

如果…就會結束

活動窗口。active pane . view . seek view = wdSeekCurrentPageHeader

如果選擇。那麽HeaderFooter.IsHeader = True

活動窗口。active pane . view . seek view = wdSeekCurrentPageFooter

其他

活動窗口。active pane . view . seek view = wdSeekCurrentPageHeader

如果…就會結束

選擇。TypeText文本:="2008 "

選擇。字段。添加範圍:=選擇。範圍，類型:=wdFieldNumPages

活動窗口。active pane . view . seek view = wdSeekMainDocument

末端接頭

在上面的宏中，我主要是在頁腳插入2008和頁碼。

上一篇:心願盒子裏有什麽物品

下一篇:生命探測儀在玉樹地震救援中，成為搜索廢墟下生命的壹雙慧眼．關於紅外生命探測儀工作原理的說法，正確的