Excel VBA 按要求转换格式

今天要讲的例子是统计加班出勤的人数。

问题如下:

Excel VBA 按要求转换格式

解决的思路如下:

Excel VBA 按要求转换格式

代码运行的结果如下:

Excel VBA 按要求转换格式

代码如下:

Excel VBA 按要求转换格式

代码解析

1:2行 dim定义变量;

2:3行 设定填充区域的左上角单元格,后期绑定字典;

3:4行 把绿色表格的数据,放入arr数组;

4:5~11行 遍历数据,把型号作为字典的key,流水线作为字典的item,采用了join函数;join函数详见《Excel VBA 数组公式Split 和Join》

5:12行 根据字典的数量,重新设定一给新的数组brr;

6:13~14行 设定表头

7:15~28行 求出原材料的支数和及长度

8:29~35行 设定目标区域的单元格格式,并把新数组brr赋值给该区域

私信 视频 可以获取54集VBA入门视频

私信 VBA或 vba 可以获取文章中含VBA代码的Excle文件


分享到:


相關文章: