Application.TextStylesEx 方法 (Project)

在活动视图中设置任务和资源的文本样式。

语法

表达式。TextStylesEx (项、 字体、 大小、 粗体、 斜体、 下划线、 颜色、 CellColor、 图案)

expression：表示 Application 对象的变量。

参数

名称	必需/可选	数据类型	说明
Item	可选	Integer	要更改的文本类型。 可以是下列的 PjTextItem 常量之一。 请参阅 甘特图是否处于活动状态。
Font	可选	String	字体的名称。 如果活动视图为“网络图”并且 Item 不为 pjAll，将忽略 Font 参数。
Size	可选	Integer	字体的大小，以磅为单位。 如果活动视图为“网络图”并且 Item 不为 pjAll，将忽略 Size 参数。
Bold	可选	Boolean	如此 如果字体格式为加粗。否则为 假 。
Italic	可选	Boolean	如此 如果指定字体为斜体。否则为 假 。
Underline	可选	Boolean	如此 如果字体带下划线;否则为 假 。
Color	可选	Long	字体颜色。 可以是 PjColor 常量之一， () 查看 PjColor 常量 表。
CellColor	可选	Long	单元格的背景颜色。 可以是 PjColor 常量之一。
Pattern	可选	Integer	单元格的背景图案。 可以是 PjBackgroundPattern 常量之一。

如果甘特图处于活动状态

甘特图活动	甘特图活动继续
pjAll	pjGanttMajorTimescale
pjNoncritical	pjGanttMinorTimescale
pjCritical	pjBarTextLeft
pjMilestone	pjBarTextRight
pjSummary	pjBarTextTop
pjProjectSummary	pjBarTextBottom
pjMarked	pjBarTextInside
pjTaskFilterHighlight	pjGanttExternalTask
pjTaskRowColumnTitles

如果“任务使用情况”视图处于活动状态

任务使用情况	任务使用情况继续
pjAll	pjTaskFilterHighlight
pjCritical	pjTaskMajorTimescale
pjMarked	pjTaskMinorTimescale
pjMilestone	pjTaskRowColumnTitles
pjNoncritical	pjTaskUsageAssignmentRow
pjProjectSummary	pjTaskUsageExternalTask
pjSummary

如果任务表处于活动状态

任务表 1	任务表 2
pjAll	pjGanttMajorTimescale
pjNoncritical	pjGanttMinorTimescale
pjCritical	pjBarTextLeft
pjMilestone	pjBarTextRight
pjSummary	pjBarTextTop
pjProjectSummary	pjBarTextBottom
pjMarked	pjBarTextInside
pjTaskFilterHighlight	pjGanttExternalTask
pjTaskRowColumnTitles

任务表 3	任务表 4
pjAll	pjTaskFilterHighlight
pjCritical	pjTaskMajorTimescale
pjMarked	pjTaskMinorTimescale
pjMilestone	pjTaskRowColumnTitles
pjNoncritical	pjTaskUsageAssignmentRow
pjProjectSummary	pjTaskUsageExternalTask
pjSummary

任务表 5	任务表 6
pjAll	pjProjectSummary
pjCritical	pjSummary
pjMarked	pjTaskSheetExternalTask
pjMilestone	pjTaskFilterHighlight
pjNoncritical	pjTaskRowColumnTitles

PjColor 常量

PjColor	Pj 颜色继续
pjColorAutomatic	pjNavy
pjAqua	pjOlive
pjBlack	pjPurple
pjBlue	pjRed
pjFuchsia	pjSilver
pjGray	pjTeal
pjGreen	pjYellow
pjLime	pjWhite
pjMaroon

返回值

Boolean

说明

使用 TextStylesEx 方法，而不指定任何参数将显示 文本样式对话框。

若要使用十六进制 RGB 值设置文本样式，请参阅 TextStyles32Ex 方法。

支持和反馈

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