1、首先进行变量的声明【arr=装数据、i=循环、d=字典】。

2、然后【创建字典】再然后将【区域书写进来arr=b21：e21】。

3、然后进行【For循环】代码如图所示。

4、然后在【For循环下方插入If的判断公式】代码如图。

5、然后将【d（arr（i,1））的值取出】取出的公式如图。

6、然后继续输入代码，将取出来的值相加，代码如图。

7、然后将【items的值赋值给m】并将m添加到自变量中。

8、然后继续输入公式（两次），目的是为了【将值导出】。

9、然后【复制工具】修改参数将【G2单元格对应的值导出】。

10、然后【运行】检查是否存在问题，【问题存在】：【G2单元格对应的公式中，只需要一个Application.Transposed】修改后的公式如图。

11、本节课内容到此结束。