Application.TableEdit 方法 (Project)
创建、编辑或复制表。
语法
expression。 TableEdit
( _Name_
, _TaskTable_
, _Create_
, _OverwriteExisting_
, _NewName_
, _FieldName_
, _NewFieldName_
, _Title_
, _Width_
, _Align_
, _ShowInMenu_
, _LockFirstColumn_
, _DateFormat_
, _RowHeight_
, _ColumnPosition_
, _AlignTitle_
, _HeaderAutoRowHeightAdjustment_
, _HeaderTextWrap_
)
expression:表示 Application 对象的变量。
参数
名称 | 必需/可选 | 数据类型 | 说明 |
---|---|---|---|
Name | 必需 | String | 要编辑、创建或复制的表的名称。 |
TaskTable | 必需 | Boolean | 如此 如果活动表包含有关任务或资源;否则为 假 。 |
Create | 可选 | Boolean | 为 项目创建一个表,否则为 假 如果。 如果未定义新名称,则新的表提供名称与指定的名称。 否则为新表副本的名称与指定的表,并给出新名称与指定的名称。 默认值为 False 。 |
OverwriteExisting | 可选 | Boolean | 如此 如果新表将覆盖现有的表。 默认值为 False 。 |
NewName | 可选 | 字符串 | 创建 (现有表的新名称为 False) , (Create 为 True) 新表。 如果未定义新名称创建为 假 ,名称与指定的表将保留其当前名称。 默认值为空字符串 ("")。 |
FieldName | 可选 | String | 要更改的域名称。 |
NewFieldName | 可选 | String | 新域的名称。 由 NewFieldName 指定的域将替换由 FieldName 指定的域。 |
Title | 可选 | String | 由 FieldName 指定的域的标题。 |
Width | 可选 | Integer | 一个数字,指定 FieldName 所指定的域的宽度。 对于新域,默认值为 10。 |
Align | 可选 | Integer | 指定字段名的指定字段中的文本的对齐方式。 可以是下列的 PjAlignment 常量之一: pjLeft 、 pjCenter 或 pjRight 。 默认值是 pjRight 。 |
ShowInMenu | 可选 | Boolean | 如果表名称出现在 Tables 下拉菜单中,则为 True;否则为 False。 (“ 表 ”下拉菜单位于 Ribbon 的“ 视图 ”选项卡上。) 默认值为 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。 |
返回值
Boolean
说明
项目设置的顺序为年,月,和日期格式的日期等于在 Windows 控制面板的 区域和语言选项 对话框中相应的值。
若要创建活动表的副本,请参阅 TableCopy 方法。 若要包括可使表中的文本自动换行的选项和使用 "添加新列" 功能,请参阅 TableEditEx 方法。
示例
下面的示例将基于"任务分配状况"(Task Usage) 表创建一个新表,并将其添加到 "表"(Table) 下拉菜单中。 该宏将"优先级"(Priority) 域作为第二列(使其具有标题,并将列宽设置为 12)添加,并更改默认的日期格式,然后使新表成为活动视图。
Sub CreateNewTaskUsageTable()
TableEdit Name:="Usage", TaskTable:=True, Create:=True, _
NewName:="Priority Tasks"
TableEdit 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 支持和反馈,获取有关如何接收支持和提供反馈的指南。