Project) (Application.FilePageSetupFooter 方法
會設定要列印的頁尾。
語法
expression。 FilePageSetupFooter( _Name_, _Alignment_, _Text_ )
expression 代表 Application 物件的變數。
參數
| 名稱 | 必要/選用 | 資料類型 | 描述 |
|---|---|---|---|
| Name | 選用 | String | 要設定列印頁尾的檢視或報表名稱。 |
| Alignment | 選用 | Long | 頁尾中文字的對齊方式。 可以是下列 PjAlignment 常數之一： pjLeft 、 pjCenter 、 或 pjRight 。 預設值為 pjCenter 。 |
| Text | 選用 | String | 要顯示在頁尾的文字。 頁尾可以包含下列特殊格式代碼： |
| 格式代碼 | 描述 |
|---|---|
| &B | 開關列印粗體字元功能。 |
| &I | 開關列印斜體字元功能。 |
| &U | 開啟或關閉列印底線功能。 |
| &“”fontname“” | 按照指定字型中的格式代碼列印字元。 範例為 &""Arial""。 |
| &nn | 按照指定字型大小中的格式代碼列印字元。 使用一個兩位數指定點數大小。 範例為 &08。 |
| &P“”path“” | Inserts the specified image. 例如 &P“” [My Documents] \Image.gif“”。 [My Documents] 一詞代表 [我的文件] 資料夾的完整路徑。 |
| &[日期] | 列印目前的系統日期。 |
| &[Time] | 列印目前的系統時間。 |
| &[檔案] | 列印檔案名稱。 |
| &[Page] | 列印頁碼。 |
| &[Pages] | 列印文件的總頁數。 |
| &[Project Title] | 列印標題。 |
| &[公司] | 列印公司名稱。 |
| &[Manager] | 列印經理名稱。 |
| &[Start Date] | 列印專案開始日期。 |
| &[Finish Date] | 列印專案完成日期。 |
| &[Current Date] | 列印專案目前日期。 |
| &[Status Date] | 列印專案狀態日期。 |
| &[檢視] | 列印檢視名稱。 |
| &[報表] | 列印報表名稱。 |
| &[篩選] | 列印篩選器名稱。 |
| &[Saved Date] | 列印最後儲存日期。 |
| &[Subject] | 列印主旨。 |
| &[作者] | 列印作者。 |
| &[關鍵詞] | 列印關鍵字。 |
| &[ Field_Name ] | 列印以 Field_Name 指定的欄位值。 如果將使用一種以上的語言執行巨集，則以 Field_Name 指定的欄位必須使用對應語言本地化後的名稱。 範例為 &[實際成本]。 |
傳回值
布林值
註解
Using the FilePageSetupFooter method without specifying any arguments displays the Page Setup dialog box with the Footer tab selected.
範例
下列範例會設定要列印的頁尾。
Sub SetLegend()
Dim strLegend As String
strLegend = GetFontFormatCode("Arial")
strLegend = strLegend & "&BThis text will appear in the legend.&B"
Application.FilePageSetupLegend Text:=strLegend, _
Alignment:=pjCenter, LegendOn:=pjOnEveryPage
End Sub
Public Function GetFontFormatCode(strFontName As String) As String
GetFontFormatCode = "&" & Chr(34) & strFontName & Chr(34)
End Function
支援和意見反應
有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。