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	如果 Project 使用资源替换向导中的大纲代码，则为 True;否则为 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 支持和反馈，获取有关如何接收支持和提供反馈的指南。