如何用vba添加创建用于排序和填充序列的自定义列表?

在excel中内置了许多排序和填充序列的列表,如下图所示;

如果要用vba添加自定义系列,可以使用Application对象的AddCustomList方法。

比如要添加自定义系列”A,B,C,D,E,F,G”,可以使用如下的vba代码:

每一个自定义系列在自定义系列列表中都有序号,序号从1开始,比如上图的自定义系列列表中总共有8个自定义系列。如果要返回所有的自定义系列的个数,可以使用使用Application对象的CustomListCount方法,如果要返回具体的某个序号的自定义系列,可以使用Application对象的GetCustomListContent方法,如果要返回具体的某个自定义系列对应的序号,可以使用Application对象的GetCustomListNum方法,如果要删除某个自定义系列,可以使用Application对象的DeleteCustomList方法。

示例代码如下:

 

       

发表评论