Application.FilePageSetupCalendarTextEx 方法 (Project)

设置日历视图的文本格式以进行打印，其中的文本颜色可以是十六进制值。

语法

expression。 FilePageSetupCalendarTextEx( _Name_, _Item_, _Font_, _Size_, _Bold_, _Italic_, _Underline_, _Color_ )

表达 返回 Application 对象的表达式。

参数

名称	必需/可选	数据类型	说明
Name	可选	String	要编辑的日历的名称。
Item	可选	Long	要设置格式的文本项。 可以是 PjPageSetupCalendarItem 常量之一。
Font	可选	String	字体的名称。
Size	可选	Integer	字体的大小，以磅为单位
Bold	可选	Boolean	如此 如果字体格式为加粗。否则为 假 。
Italic	可选	Boolean	如此 如果指定字体为斜体。否则为 假 。
Underline	可选	Boolean	如此 如果字体带下划线;否则为 假 。
Color	可选	Long	文本的颜色。 可以是十六进制的 RGB 值，其中红色是最后一个字节。 例如，值 &H01FFFF 为黄色。

返回值

Boolean

说明

使用不带任何参数的 FilePageSetupCalendarTextEx 方法将显示 文本样式对话框。

注意

[!注释] FilePageSetupCalendarTextEx 只适合于打印日历视图。

示例

下面的示例将月份标题的格式设置为红色以进行打印。

Sub File_PageSetupCalendarText() 
 
    'Activate the Calendar view. 
    ViewApply Name:="&Calendar" 
 
    FilePageSetupCalendarTextEx Item:=pjMonthlyTitles, Color:=&0101FF 
    FilePrint 
End Sub

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。