乔山办公网我们一直在努力
您的位置:乔山办公网 > excel表格制作 > Excel VBA 复杂的行列转换2-excel行列转换

Excel VBA 复杂的行列转换2-excel行列转换

作者:乔山办公网日期:

返回目录:excel表格制作

今天讲的实例,是昨天《Excel VBA 复杂的行列转换》的逆过程

问题如下:

Excel VBA 复杂的行列转换2

解决的思路如下:

Excel VBA 复杂的行列转换2

代码运行的结果如下:

Excel VBA 复杂的行列转换2

代码如下:

Excel VBA 复杂的行列转换2

代码解析

1:2~3行 dim定义变量;

2:4~6行 后期绑定三个字典,作用见后面的注释;

4:8行 把数据表数据,放入数组arr;

4:9~14行 把数据分别写入字典,达到去重的目的;

5:15行 重新定义需求数据的数组大小

6:17~18行 写入第一行的标题栏;

7:20~22行 写入店号;

8:24~27行 写入商品及价格;

9:29-34行 写入要货量,此处采用了for循环的嵌套

10:36~41 用with语句,设置单元格的格式。注:此处的with语句,是在大的with语句下方。

11:42行 在目标区域,写入数组

12:44行 设置三个字典为空。

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

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

相关阅读

  • Excel VBA 复杂的行列转换2-excel行列转换

  • 乔山办公网excel表格制作
  • excel行列转换,作用见后面的注释;4:8行把数据表数据,放入数组arr;4:9~14行把数据分别写入字典,达到去重的目的;5:15行重新定义需求数据的数组大小6:17~18行写入第一行的标题栏
关键词不能为空
极力推荐

ppt怎么做_excel表格制作_office365_word文档_365办公网