命令树按列合并



需求：表间公式统计后根据填充的值，利用合并单元格功能，将相同的值自动进行合并，合并后再通过命令树将区域内将列值相同的进行合并。白话就是：将明细表中的小计、合计、总计的单元格合并起来。
方法：通过命令树对区域内的值进行遍历，如果左右两列相同则合并。
效果：
1、下图为模板界面，图中的数据区域别名为Area

2、下图为点击按钮执行命令树后将合计和总计合并后的效果

写法：

1.     如果("#当前按钮名称"="Button 1")
   
2.       循环(#r,Rows(Area))
   
3.         循环(#c,Columns(Area))
   
4.           单元格取值(Area,#r-1,#c-1,#BeforeValue)
   
5.           单元格取值(Area,#r-1,#c,#AfterValue)
   
6.           单元格取值(Area,#r-1,#c+1,#ThirdValue)
   
7.           声明变量(#m,#r+3)
   
8.           声明变量(#n,#r+3)
   
9.           声明变量(#x,#c+1)
   
10.           声明变量(#y,#c+2)
    
11.           声明变量(#z,#c+3)
    
12.           如果(And("#BeforeValue"="#AfterValue","#BeforeValue"="合计"))
    
13.             取区域(#x,#y,#m,#n,#MergeArea)
    
14.             单元格合并(#MergeArea,True)
    
15.           如果(And("#BeforeValue"="#AfterValue","#AfterValue"="#ThirdValue","#BeforeValue"="总计"))
    
16.             取区域(#x,#z,#m,#n,#MergeArea)
    
17.             单元格合并(#MergeArea,True)

复制代码

牛牛牛，太强了

牛牛牛，太强了