Application.TableEditEx 方法 (Project)

创建、编辑或复制可以自动换行并包括 "添加新列" 功能的表。

语法

expression。 TableEditEx( _Name_, _TaskTable_, _Create_, _OverwriteExisting_, _NewName_, _FieldName_, _NewFieldName_, _Title_, _Width_, _Align_, _ShowInMenu_, _LockFirstColumn_, _DateFormat_, _RowHeight_, _ColumnPosition_, _AlignTitle_, _HeaderAutoRowHeightAdjustment_, _HeaderTextWrap_, _WrapText_, _ShowAddNewColumn_ )

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

参数

名称	必需/可选	数据类型	说明
Name	必需	String	要编辑、创建或复制的表的名称。
TaskTable	必需	Boolean	如此 如果活动表包含有关任务或资源;否则为 假 。
Create	可选	Boolean	为 项目创建一个表; 如果否则为 假 。 如果未定义，则 NewName新表提供由 Name指定的名称。 否则，新表是 Name 指定的表的副本，并且由 NewName 指定的名称。 默认值为 False。
OverwriteExisting	可选	Boolean	如此 如果新表; 将覆盖现有的表否则为 假 。 默认值为 False 。
NewName	可选	字符串	( Create 为 False) 现有表的新名称，或者新表 ( Create 为 True) 。 如果未定义 NewName和 Create为 假 ，由 Name指定的表将保留其当前名称。 默认值为空字符串 ("")。
FieldName	可选	String	要更改的域名称。
NewFieldName	可选	String	新字段的名称。 NewFieldName 指定的字段将替换 FieldName 指定的字段。
Title	可选	字符串	FieldName 指定的字段的标题。
Width	可选	Integer	一个数字，指定 FieldName 指定的字段的宽度。 默认值是 10 的新字段。
Align	可选	Integer	指定如何对齐 FieldName 指定的字段中的文本。 可以是下列的 PjAlignment 常量之一: pjLeft 、 pjCenter 或 pjRight 。 默认值是 pjRight 。
ShowInMenu	可选	Boolean	如果表名称出现在 Tables 下拉菜单中，则为 True；否则为 False。 (“ 表 ”下拉菜单位于 “视图 ”功能区上。) 默认值为 False。
LockFirstColumn	可选	Boolean	如此 如果项目锁定或禁止对表; 第一列进行修改否则为 假 。 默认值为 False 。
DateFormat	可选	Integer	一个常量，指定表中的日期字段的格式。 可以是 PjDateFormat 常量之一。 默认值是 pjDateDefault 。
RowHeight	可选	Integer	表中行的高度。 默认值为 1。
ColumnPosition	可选	Long	要编辑的列的编号。 (从左到右对列进行编号，从 0.) 如果指定 了 NewFieldName ，则会在表中插入一个新列。 如果 ColumnPosition 设置为 0，则新字段将插入到第一列中， ( LockFirstColumn 为 False) 或第二列 ( LockFirstColumn 为 True) 表。 将 ColumnPosition 设置为 -1 以指定表的最后一列。 默认值为 -1。
AlignTitle	可选	Long	一个常量，指定列标题的对齐方式。 可以是下列的 PjAlignment 常量之一: pjLeft 、 pjCenter 或 pjRight 。 默认值是 pjCenter 。
HeaderAutoRowHeightAdjustment	可选	Boolean	如此 如果项目自动调整行高的表;否则为 假 。 默认值为 True 。
HeaderTextWrap	可选	Boolean	如此 如果项目文字环绕文本框的标题中的表格;否则为 假 。 默认值为 True 。
WrapText	可选	Boolean	如此 如果表格自动换行;否则为 假 。
ShowAddNewColumn	可选	Boolean	如果表在最右侧列中显示“添加新列”功能，则为 True;否则为 False。

返回值

Boolean

说明

项目设置的顺序为年，月，和日期格式的日期等于在 Windows 控制面板的 区域和语言选项 对话框中相应的值。

若要创建活动表的副本，请参阅 TableCopy 方法。

示例

下面的示例基于"任务分配状况"(Task Usage) 表创建一个表，包括 "添加新列"(Add New Column) 功能，并将该表添加到 "表"(Table) 下拉菜单中。 该宏将"优先级"(Priority) 域作为第二列（使其具有标题，并将列宽设置为 12）添加，并更改默认的日期格式，然后使新表成为活动视图。

Sub CreateNewTaskUsageTable() 
    TableEditEx Name:="Usage", TaskTable:=True, Create:=True, _ 
        NewName:="Priority Tasks", ShowAddNewColumn:=True 
 
    TableEditEx Name:="Priority Tasks", TaskTable:=True, _ 
        NewFieldName:="Priority", Title:="Priority", Width:=12, _ 
        ShowInMenu:=True, DateFormat:=pjDate_mm_dd_yy, _ 
        ColumnPosition:=1 
 
    TableApply "Priority Tasks" 
End Sub

支持和反馈

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