Application.CustomOutlineCodeEditEx 方法 (Project)
编辑本地大纲代码自定义域定义。
语法
表达式。CustomOutlineCodeEditEx (FieldID、 Level、 Sequence、 Length、 Separator、 OnlyLookUpTableCodes、 OnlyCompleteCodes、 OnlyLeaves、 MatchGeneric、 RequiredCode、 LookupDefault、 DefaultValue、 SortOrder)
表达 返回 Application 对象的表达式。
参数
名称 | 必需/可选 | 数据类型 | 说明 |
---|---|---|---|
FieldID | 必需 | PjCustomField | 指定要编辑的自定义大纲代码。 可以是非企业 PjCustomField 常量之一。 |
Level | 可选 | Long | 要编辑的代码掩码的级别。 默认值是比当前为域指定的最高级别再高一级的值。 |
Sequence | 可选 | PjCustomOutlineCodeSequence | 指定级别中的级别顺序。 可以是 PjCustomOutlineCodeSequence 常量之一。 默认值是 pjCustomOutlineCodeNumbers 。 |
Length | 可选 | Variant | 指定给定级别的长度。 可以是字符串"Any"或 1 到 255 之间的整数。 默认值为"Any"。 |
Separator | 可选 | String | 将 Level 中指定的级别与下一级别分开的字符。 可以是"."、"-"、"+"或"/"中的一个。 默认值为"."。 |
OnlyLookUpTableCodes | 可选 | Boolean | 如果只能使用查阅表格中列出的代码,则为 True;否则为 False。 默认值为 False,允许添加其他项。 |
OnlyCompleteCodes | 可选 | Boolean | 如果只能使用所有级别的掩码值的代码,则为 True;否则为 False。 默认值为 False。 |
LookupTableLink | 可选 | Long | 在Project及更高版本中,弃用。 本地的大纲代码不能共享查阅表格。 谨慎 不要将 LookupTableLink 与企业全局或企业查找表一起使用。 Data corruption can result. |
OnlyLeaves | 可选 | Boolean | 如果只能选择不带从属值的大纲代码值,则该属性值为 True;否则为 False。 默认值为 False。 |
MatchGeneric | 可选 | Boolean | 如此 如果 项目使用资源替换向导中的大纲代码;否则为 False。 默认值为 False。 |
RequiredCode | 可选 | Boolean | 如果在允许保存之前必须存在大纲代码,则该属性值为 True;否则为 False。 默认值为 False。 |
LookupDefault | 可选 | Boolean | 如果大纲代码具有默认值,则为 True;否则为 False。 默认值为 False。 |
DefaultValue | 可选 | String | 指定大纲代码的默认值。 |
SortOrder | 可选 | Long | 指定是否排序升序、 降序,或查找表的行顺序。 可以是 PjListOrder 常量之一。 默认值为 pjListOrderDefault 。 |
返回值
Boolean
说明
如果只指定了 FieldID 参数,CustomOutlineCodeEditEx 方法将为指定的大纲代码显示“代码掩码定义”对话框。
OnlyLeaves、MatchGeneric 和 RequiredCode 参数只能在 Project Professional 中使用。
示例
下面的示例编辑的任务,在这唯一的代码掩码是现有的 大纲代码 1 "*"的第一个级别。 示例中的第一个命令的 CustomOutlineCodeEditEx 方法中的默认值,指定第二个级别使用两位数字代码,按数字排序和分开的第三级"-"字符。 第二个命令指定第三个级别使用一个大写字母。 它还指定可以使用只包含这三个级别的代码。
为了使用此示例,原始 "大纲代码 1" 在第一级中包含字符"oc1"。 在运行代码后,代码掩码为"*.11-A"。 用户可以编辑查阅表格,例如,在"oc1"之下的级别中添加"23",在第三级中添加"X"。 在设置 "大纲代码 1" 的值时,用户可以选择 "oc1.23-X",但不能选择 "oc1.23"。
Sub EditCustOutlineCode()
CustomOutlineCodeEditEx pjCustomTaskOutlineCode1, Length:=2, _
Separator:="-"
CustomOutlineCodeEditEx pjCustomTaskOutlineCode1, Length:=1, _
Sequence:=pjCustomOutlineCodeUppercaseLetters, OnlyCompleteCodes:=True
End Sub
在以下示例中,任务 "Outline Code 3"(大纲代码 3)包含查阅表格值"a"、"b"和"c"。 运行此示例会将用户在设置值时所见顺序更改为"c"、"b"和"a",并且默认值为"b"。
Sub ChangeOCDefaults()
CustomOutlineCodeEditEx FieldID:=pjCustomTaskOutlineCode3, SortOrder:=pjListOrderDescending
CustomOutlineCodeEditEx FieldID:=pjCustomTaskOutlineCode3, LookupDefault:=True, DefaultValue:="b"
End Sub
支持和反馈
有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。