Excel) (Application.AddCustomList 方法

为自定义自动填充和/或自定义排序添加自定义列表。

语法

表达式。AddCustomList (ListArray， ByRow)

expression：表示 Application 对象的变量。

参数

名称	必需/可选	数据类型	说明
ListArray	必需	Variant	将源数据指定为字符串数组或 Range 对象。
ByRow	可选	Variant	仅当 ListArray 是 Range 对象时使用。 如果为 true，则从区域中的每一行创建自定义列表。 如果为 False，则从范围内的每一列创建自定义列表。 如果省略此参数，并且该区域的行数多于 (列或) 的行数和列数相等，则 Excel Microsoft根据该区域中的每一列创建自定义列表。 如果省略此参数，并且区域中的列数多于行数，则 Excel 会从区域中的每一行创建自定义列表。

备注

如果尝试添加的列表已存在，则此方法将引发运行时错误 1004。 使用 On Error 语句捕获错误。

示例

本示例将一个字符串数组添加到自定义列表中。

On Error Resume Next  ' if the list already exists, don'thing
Application.AddCustomList Array("cogs", "sprockets", _ 
 "widgets", "gizmos")
On Error Goto 0       ' resume regular error handling

支持和反馈

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