萬盛學電腦網

您现在的位置: 萬盛學電腦網 >> 辦公室軟體 >  >> WPS Office >> WPS 綜合教學

WPS 文字頁首頁尾操作技巧與 VBA 開發指南

在 WPS 文字二次開發中,常需操作頁首與頁尾。本文透過 WPS 提供的開發介面,結合 Word 相容性說明,詳細介紹頁首頁尾的讀取、修改、圖形操作及注意事項。

核心概念

區段、頁面設定與域

  • 區段:文件的下一層級物件,頁首頁尾可在不同區段獨立設定。
  • 頁面設定:包含「奇偶頁不同」(適合書本排版)與「首頁不同」(適合封面不顯示頁碼)。
  • 域:插入頁碼實為域,會隨頁碼自動更新。

讀取頁首頁尾內容

以頁首為例,頁尾只需將 Headers 改為 Footers。常用方法:ActiveDocument.Sections(1).Headers(wpsHeaderFooterPrimary).Range.Text

枚舉值說明:

名稱值描述
wpsHeaderFooterEvenPages3返回偶數頁頁首/頁尾
wpsHeaderFooterFirstPage2返回首頁頁首/頁尾
wpsHeaderFooterPrimary1返回首頁以外所有頁頁首/頁尾

不同頁面設定下的讀取差異

  • 勾選「奇偶頁不同」:偶數頁用 wpsHeaderFooterEvenPages,奇數頁用 wpsHeaderFooterPrimary。WPS 讀取首個匹配頁首,Word 則依游標位置動態讀取。
  • 勾選「首頁不同」:首頁用 wpsHeaderFooterFirstPage,其餘頁用 wpsHeaderFooterPrimary。

刪除與修改頁首內容

同理,例如:ActiveDocument.Sections(1).Headers(wpsHeaderFooterPrimary).Range.Text = "KingSoft"

操作頁首中的圖形與圖片

讀取圖形數量

使用 .Range.ShapeRange.Count 而非 .Shapes.Count,因順序不同。

新增圖片並靠左/靠右對齊(VBA 範例)

Sub AddPicturetoHeaderToLeft()
    Dim myleft, mytop
    myleft = ActiveDocument.Sections(1).PageSetup.LeftMargin
    mytop = ActiveDocument.Sections(1).PageSetup.HeaderDistance
    ActiveDocument.Sections(1).Headers(wpsHeaderFooterPrimary).Shapes.AddPicture _
    "C:tempafter.gif", Left:=myleft, Top:=mytop
End Sub

右對齊需計算寬度並減去圖片寬度;頁尾同理。

注意事項

  1. 插入頁碼後進入頁首頁尾視圖,游標預設在頁碼圖文框中,可能影響 API 切換視圖編輯。
  2. ShapeRange 與 Shapes 順序不同,取最後插入圖形宜用 Shapes 集合。

適用版本

WPS Office 2009 (1705) 以上版本。

copyright © 萬盛學電腦網 all rights reserved