<p>自上次的实例之三发表以后,三个多月又过去了,通过对网友提出的问题的回复,我自己也在不断地学习中</p><p>有了一些提高,深深的感觉到在实战中学,在论坛中学是一个极有效的方法。也积累了一些例子,现整理后</p><p>继续发表,以供大家学习VBA时参考,如果能对大家的学习有所帮助,我就很高兴了。<br/>附件目录:<br/>0,自编宏及实例选之四代码集.doc<br/>1,数组重复值的次数为最大(赋值给数组、字典、各个重复值的重复次数数组、数组的最大值)<br/>2,另类统计数字(字典、数组排序、字符串数组转换为数字数组)<br/>3,一钮统计一年报表(Find方法、合并单元格行数)<br/>4,财务数据整理(Copy方法、排序)<br/>5,数据拆分和汇总(分列、筛选、比较、排序)<br/>6,出库数量统计(分列、筛选、比较、排序)<br/>7,从文本文件中复制部分数据(OpenText方法)<br/>8,两条趋势线的交点坐标(DataLabel)<br/>9,收盘价之和(数组汇总)<br/>10,复杂的定位复制(多条件查询、数组、Find方法)<br/>11,卡号查询(合并单元格取值、Find方法)<br/>12,出库汇总(设置合并单元格、Find方法、公式格式复制、公式用变量、加边框、不重复值)<br/>13,备份(数组不重复值、排序)<br/>14,客户分类(高级筛选不重复值、分表)<br/>15,多工作簿汇总(复制相同结构)<br/>16,重复值分离(不重复值及个数、Split方法)<br/>17,超链接自动生成(Hyperlink公式中引用单元格)<br/>18,数据提取(Instr函数、数组赋值)<br/>19,批量插入指定文件夹图片(FileSearch 函数)<br/>20,查询指定文件夹图片(Pictures.Insert 函数)<br/>21,多表汇总(数组、格式)<br/>22,导出N列数据到文本文件<br/>23,不打开工作簿汇总(ADODB)<br/>24,上升下降两条趋势线的不同颜色<br/>25,自动抽样(高级筛选)<br/>26,数据转换还原(查找、分列、行排序)<br/>27,多条件、有区间统计(ADO-Sql)<br/>28,多表格数据自动制图(Add)【注:此表缺】<br/>29,复杂数据上色(数组比较)<br/>30,复杂条件汇总(动态数组赋值)<br/>附:自编宏及实例选之一-网址:<a href="http://www.excelpx.com/forum.php?mod=viewthread&tid=15062">http://www.excelpx.com/forum.php?mod=viewthread&tid=15062</a><br/>自编宏及实例选之二-网址:<a href="http://www.excelpx.com/forum.php?mod=viewthread&tid=19915&replyID=&skin=1">http://www.excelpx.com/forum.php?mod=viewthread&tid=19915&replyID=&skin=1</a><br/>自编宏及实例选之三-网址:<a href="http://www.excelpx.com/forum.php?mod=viewthread&tid=28077&replyID=&skin=1">http://www.excelpx.com/forum.php?mod=viewthread&tid=28077&replyID=&skin=1</a></p><p> </p>0,自编宏及实例选之四代码集.doc<br/>
[此贴子已经被作者于2008-1-11 21:34:08编辑过] |